From 70daaf6213b7bfcd62e241e1e108f94c6ad7da8b Mon Sep 17 00:00:00 2001 From: Phil Hagelberg Date: Tue, 30 Nov 2010 21:03:21 -0800 Subject: [PATCH] Sanity check for scp. Disabled for now. Need to figure out a way to get shell-command output to show in the shell rather than just echoing return value. --- starter-kit-eshell.el | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/starter-kit-eshell.el b/starter-kit-eshell.el index d09b991..643e203 100644 --- a/starter-kit-eshell.el +++ b/starter-kit-eshell.el @@ -35,6 +35,13 @@ (defun eshell/find (dir &rest opts) (find-dired dir (mapconcat 'identity opts " "))) +;; (defun eshell/scp (&rest args) +;; "scp: now without colon-omitting annoyance!" +;; (when (null (remove-if-not (lambda (arg) (string-match ":" arg)) +;; args)) +;; (error "Surely you meant to add a colon in there somewhere?")) +;; (shell-command (mapconcat 'identity (cons "scp" args) " "))) + ;; Port features from ;; http://blog.peepcode.com/tutorials/2009/shell-method-missing/shell_method_missing.rb ;; * cloning git repos, github repos