From 0d182a34a175b04f05f86a1494cd4cd447777786 Mon Sep 17 00:00:00 2001 From: Thien-Thi Nguyen Date: Sun, 26 Aug 2007 01:52:30 +0000 Subject: (eshell-eval-using-options): Add debug declaration. --- lisp/eshell/esh-opt.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'lisp/eshell/esh-opt.el') 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) -- cgit v1.2.1