esh-opt trivia.

* lisp/eshell/esh-opt.el (eshell-eval-using-options):
Do not bind unused local variable `eshell-option-stub'.
This commit is contained in:
Glenn Morris 2011-03-22 19:52:52 -07:00
parent 927c53e762
commit 18d05bed65
2 changed files with 6 additions and 4 deletions

View file

@ -1,5 +1,8 @@
2011-03-23 Glenn Morris <rgm@gnu.org>
* eshell/esh-opt.el (eshell-eval-using-options):
Do not bind unused local variable `eshell-option-stub'.
* progmodes/gdb-mi.el (gdb): Fix typo in previous change.
2011-03-22 Juanma Barranquero <lekktu@gmail.com>

View file

@ -102,10 +102,9 @@ interned variable `args' (created using a `let' form)."
macro-args
(list 'eshell-stringify-list
(list 'eshell-flatten-list macro-args)))))
(let ,(append (mapcar (lambda (opt)
(or (and (listp opt) (nth 3 opt))
'eshell-option-stub))
(cadr options))
(let ,(append (delq nil (mapcar (lambda (opt)
(and (listp opt) (nth 3 opt)))
(cadr options)))
'(usage-msg last-value ext-command args))
(eshell-do-opt ,name ,options (quote ,body-forms)))))