Mercurial > emacs
diff lisp/eshell/esh-util.el @ 65164:4cc6dbdfa5af
(eshell-flatten-list): Don't call eshell-flatten-list on a
sub-argument if it is eq to nil.
author | John Wiegley <johnw@newartisans.com> |
---|---|
date | Fri, 26 Aug 2005 22:35:57 +0000 |
parents | 34bd8e434dd7 |
children | b93526432c17 |
line wrap: on
line diff
--- a/lisp/eshell/esh-util.el Fri Aug 26 22:35:48 2005 +0000 +++ b/lisp/eshell/esh-util.el Fri Aug 26 22:35:57 2005 +0000 @@ -294,7 +294,8 @@ "Flatten any lists within ARGS, so that there are no sublists." (let ((new-list (list t))) (eshell-for a args - (if (and (listp a) + (if (and (not (eq a nil)) + (listp a) (listp (cdr a))) (nconc new-list (eshell-flatten-list a)) (nconc new-list (list a))))