diff options
| author | Jim Porter | 2023-09-13 12:46:58 -0700 |
|---|---|---|
| committer | Jim Porter | 2023-09-13 12:48:52 -0700 |
| commit | 922d76e85615b39a9262d0f2c629dfd7e67b9e52 (patch) | |
| tree | 6630db28bfdaf712acc8909a2009deaef90f8566 | |
| parent | 4b44178e722a98b6844b045271e4b04e76469607 (diff) | |
| download | emacs-922d76e85615b39a9262d0f2c629dfd7e67b9e52.tar.gz emacs-922d76e85615b39a9262d0f2c629dfd7e67b9e52.zip | |
; Fix an Eshell error when calling a lambda with form logging enabled
* lisp/eshell/esh-cmd.el (eshell-do-eval): Don't call 'symbol-name';
the function might be a closure.
| -rw-r--r-- | lisp/eshell/esh-cmd.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/eshell/esh-cmd.el b/lisp/eshell/esh-cmd.el index 95e9e2599e9..e5ddcfcaa35 100644 --- a/lisp/eshell/esh-cmd.el +++ b/lisp/eshell/esh-cmd.el | |||
| @@ -1180,7 +1180,7 @@ have been replaced by constants." | |||
| 1180 | (if (and args (not (memq (car form) '(run-hooks)))) | 1180 | (if (and args (not (memq (car form) '(run-hooks)))) |
| 1181 | (eshell-manipulate form | 1181 | (eshell-manipulate form |
| 1182 | (format-message "evaluating arguments to `%s'" | 1182 | (format-message "evaluating arguments to `%s'" |
| 1183 | (symbol-name (car form))) | 1183 | (car form)) |
| 1184 | (while args | 1184 | (while args |
| 1185 | (setcar args (eshell-do-eval (car args) synchronous-p)) | 1185 | (setcar args (eshell-do-eval (car args) synchronous-p)) |
| 1186 | (setq args (cdr args))))) | 1186 | (setq args (cdr args))))) |