changeset 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 ef138cf4be94
children 2a21167e759e
files lisp/eshell/esh-util.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
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))))