diff options
author | Thien-Thi Nguyen <ttn@gnuvola.org> | 2007-08-26 01:52:30 +0000 |
---|---|---|
committer | Thien-Thi Nguyen <ttn@gnuvola.org> | 2007-08-26 01:52:30 +0000 |
commit | 0d182a34a175b04f05f86a1494cd4cd447777786 (patch) | |
tree | 96a79a8970b09e3d83bbf7526418fb20387a8236 | |
parent | a549ce70542360af098cc94d191cc01879bf3a8e (diff) | |
download | emacs-0d182a34a175b04f05f86a1494cd4cd447777786.tar.gz emacs-0d182a34a175b04f05f86a1494cd4cd447777786.tar.bz2 emacs-0d182a34a175b04f05f86a1494cd4cd447777786.zip |
(eshell-eval-using-options): Add debug declaration.
-rw-r--r-- | lisp/ChangeLog | 5 | ||||
-rw-r--r-- | lisp/eshell/esh-opt.el | 3 |
2 files changed, 7 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index b79852362b9..005a2ddeb40 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -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. 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 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) |