diff options
Diffstat (limited to 'lisp/eshell')
| -rw-r--r-- | lisp/eshell/esh-opt.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/eshell/esh-opt.el b/lisp/eshell/esh-opt.el index 41e12e70b43..121f568a9c4 100644 --- a/lisp/eshell/esh-opt.el +++ b/lisp/eshell/esh-opt.el | |||
| @@ -58,6 +58,7 @@ BODY-FORMS. If instead an external command is run, the tag | |||
| 58 | 58 | ||
| 59 | Lastly, any remaining arguments will be available in a locally | 59 | Lastly, any remaining arguments will be available in a locally |
| 60 | interned variable `args' (created using a `let' form)." | 60 | interned variable `args' (created using a `let' form)." |
| 61 | (declare (debug (form form sexp body))) | ||
| 61 | `(let ((temp-args | 62 | `(let ((temp-args |
| 62 | ,(if (memq ':preserve-args (cadr options)) | 63 | ,(if (memq ':preserve-args (cadr options)) |
| 63 | macro-args | 64 | macro-args |
| @@ -101,7 +102,7 @@ This code doesn't really need to be macro expanded everywhere." | |||
| 101 | nil)) | 102 | nil)) |
| 102 | (error "%s" usage-msg)))) | 103 | (error "%s" usage-msg)))) |
| 103 | (throw 'eshell-external | 104 | (throw 'eshell-external |
| 104 | (eshell-external-command ext-command args)) | 105 | (eshell-external-command ext-command args)) |
| 105 | last-value)) | 106 | last-value)) |
| 106 | 107 | ||
| 107 | (defun eshell-show-usage (name options) | 108 | (defun eshell-show-usage (name options) |