aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/eshell/esh-cmd.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/eshell/esh-cmd.el')
-rw-r--r--lisp/eshell/esh-cmd.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/eshell/esh-cmd.el b/lisp/eshell/esh-cmd.el
index 1ed5d5d7018..6e03bda22b7 100644
--- a/lisp/eshell/esh-cmd.el
+++ b/lisp/eshell/esh-cmd.el
@@ -105,6 +105,8 @@
105 (require 'eldoc)) 105 (require 'eldoc))
106(require 'esh-arg) 106(require 'esh-arg)
107(require 'esh-proc) 107(require 'esh-proc)
108(require 'esh-module)
109(require 'esh-io)
108(require 'esh-ext) 110(require 'esh-ext)
109 111
110(eval-when-compile 112(eval-when-compile
@@ -285,7 +287,7 @@ otherwise t.")
285 "Return currently running command process, if non-Lisp." 287 "Return currently running command process, if non-Lisp."
286 eshell-last-async-proc) 288 eshell-last-async-proc)
287 289
288(defun eshell-cmd-initialize () 290(defun eshell-cmd-initialize () ;Called from `eshell-mode' via intern-soft!
289 "Initialize the Eshell command processing module." 291 "Initialize the Eshell command processing module."
290 (set (make-local-variable 'eshell-current-command) nil) 292 (set (make-local-variable 'eshell-current-command) nil)
291 (set (make-local-variable 'eshell-command-name) nil) 293 (set (make-local-variable 'eshell-command-name) nil)
@@ -1337,7 +1339,7 @@ messages, and errors."
1337 (eshell-print "\n")) 1339 (eshell-print "\n"))
1338 (eshell-close-handles 0 (list 'quote result))))) 1340 (eshell-close-handles 0 (list 'quote result)))))
1339 1341
1340(defalias 'eshell-lisp-command* 'eshell-lisp-command) 1342(defalias 'eshell-lisp-command* #'eshell-lisp-command)
1341 1343
1342(provide 'esh-cmd) 1344(provide 'esh-cmd)
1343 1345