1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00

(eshell-eval-using-options): Add debug declaration.

This commit is contained in:
Thien-Thi Nguyen 2007-08-26 01:52:30 +00:00
parent a549ce7054
commit 0d182a34a1
2 changed files with 7 additions and 1 deletions

View file

@ -1,3 +1,8 @@
2007-08-26 Thien-Thi Nguyen <ttn@gnuvola.org>
* eshell/esh-opt.el (eshell-eval-using-options):
Add debug declaration.
2007-08-26 Dan Nicolaescu <dann@ics.uci.edu>
* vc-hooks.el (vc-registered): Use mapc instead of mapcar.

View file

@ -58,6 +58,7 @@ BODY-FORMS. If instead an external command is run, the tag
Lastly, any remaining arguments will be available in a locally
interned variable `args' (created using a `let' form)."
(declare (debug (form form sexp body)))
`(let ((temp-args
,(if (memq ':preserve-args (cadr options))
macro-args
@ -101,7 +102,7 @@ This code doesn't really need to be macro expanded everywhere."
nil))
(error "%s" usage-msg))))
(throw 'eshell-external
(eshell-external-command ext-command args))
(eshell-external-command ext-command args))
last-value))
(defun eshell-show-usage (name options)