aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/eshell/em-basic.el
diff options
context:
space:
mode:
authorStefan Kangas2020-11-16 14:43:55 +0100
committerStefan Kangas2020-11-16 14:43:55 +0100
commit238261db95ae3e99907594e839fd30ec5476762b (patch)
tree3ae3ab72fdf8c9bca6e5ff74ed277ea744841f3d /lisp/eshell/em-basic.el
parent81588748bd85827468e297d3e44a72844438e807 (diff)
downloademacs-238261db95ae3e99907594e839fd30ec5476762b.tar.gz
emacs-238261db95ae3e99907594e839fd30ec5476762b.zip
Don't quote lambdas in eshell/*.el
* lisp/eshell/em-basic.el (eshell-echo): * lisp/eshell/em-cmpl.el (eshell-command-completion-function) (eshell-default-completion-function, eshell-cmpl-initialize) (eshell-complete-parse-arguments, eshell-complete-commands-list): * lisp/eshell/em-dirs.el (eshell-complete-user-reference): * lisp/eshell/em-hist.el (eshell-hist-unload-hook) (eshell-hist-initialize): * lisp/eshell/em-ls.el (eshell-ls-sort-entries): * lisp/eshell/em-pred.el (eshell-modifier-alist) (eshell-display-predicate-help, eshell-display-modifier-help) (eshell-pred-substitute, eshell-split-members): * lisp/eshell/em-prompt.el (eshell-prompt-function): * lisp/eshell/em-smart.el (eshell-smart-unload-hook) (eshell-smart-initialize, eshell-refresh-windows): * lisp/eshell/em-unix.el (eshell-shuffle-files): * lisp/eshell/esh-arg.el (eshell-parse-argument-hook): * lisp/eshell/esh-cmd.el (eshell-cmd-initialize) (eshell-parse-command): * lisp/eshell/esh-mode.el (eshell-preinput-scroll-to-bottom) (eshell-postoutput-scroll-to-bottom): * lisp/eshell/esh-module.el (eshell-modules-list): * lisp/eshell/esh-proc.el (eshell-read-process-name) (eshell-round-robin-kill): * lisp/eshell/esh-var.el (eshell-envvar-names) (eshell-variables-list): Don't quote lambdas.
Diffstat (limited to 'lisp/eshell/em-basic.el')
-rw-r--r--lisp/eshell/em-basic.el9
1 files changed, 4 insertions, 5 deletions
diff --git a/lisp/eshell/em-basic.el b/lisp/eshell/em-basic.el
index 6cfc89cce62..e54eab50fc9 100644
--- a/lisp/eshell/em-basic.el
+++ b/lisp/eshell/em-basic.el
@@ -90,11 +90,10 @@ or `eshell-printn' for display."
90 (car args)) 90 (car args))
91 (t 91 (t
92 (mapcar 92 (mapcar
93 (function 93 (lambda (arg)
94 (lambda (arg) 94 (if (stringp arg)
95 (if (stringp arg) 95 (set-text-properties 0 (length arg) nil arg))
96 (set-text-properties 0 (length arg) nil arg)) 96 arg)
97 arg))
98 args))))) 97 args)))))
99 (if output-newline 98 (if output-newline
100 (cond 99 (cond