Index: emacs/lisp/eshell/esh-util.el
diff -c emacs/lisp/eshell/esh-util.el:1.24 emacs/lisp/eshell/esh-util.el:1.25
*** emacs/lisp/eshell/esh-util.el:1.24 Fri Aug 26 22:35:57 2005
--- emacs/lisp/eshell/esh-util.el Fri Aug 26 22:40:01 2005
***************
*** 294,301 ****
"Flatten any lists within ARGS, so that there are no sublists."
(let ((new-list (list t)))
(eshell-for a args
! (if (and (not (eq a nil))
! (listp a)
(listp (cdr a)))
(nconc new-list (eshell-flatten-list a))
(nconc new-list (list a))))
--- 294,300 ----
"Flatten any lists within ARGS, so that there are no sublists."
(let ((new-list (list t)))
(eshell-for a args
! (if (and (listp a)
(listp (cdr a)))
(nconc new-list (eshell-flatten-list a))
(nconc new-list (list a))))
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
