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:
parent
927c53e762
commit
18d05bed65
2 changed files with 6 additions and 4 deletions
|
@ -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>
|
||||
|
|
|
@ -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)))))
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue