diff options
| author | John Wiegley | 2005-08-26 22:51:28 +0000 |
|---|---|---|
| committer | John Wiegley | 2005-08-26 22:51:28 +0000 |
| commit | 3bab4a46de08987d0c07c30f20513b2fdd573d64 (patch) | |
| tree | 35253b0054d2e0ee40d63fd1146a4350853cd0b6 /lisp/eshell | |
| parent | f4dd136182ff83c1150d7c6869732119acf93319 (diff) | |
| download | emacs-3bab4a46de08987d0c07c30f20513b2fdd573d64.tar.gz emacs-3bab4a46de08987d0c07c30f20513b2fdd573d64.zip | |
*** empty log message ***
Diffstat (limited to 'lisp/eshell')
| -rw-r--r-- | lisp/eshell/esh-util.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/eshell/esh-util.el b/lisp/eshell/esh-util.el index 70179097d87..c05f6abb23b 100644 --- a/lisp/eshell/esh-util.el +++ b/lisp/eshell/esh-util.el | |||
| @@ -294,8 +294,7 @@ If N or M is nil, it means the end of the list." | |||
| 294 | "Flatten any lists within ARGS, so that there are no sublists." | 294 | "Flatten any lists within ARGS, so that there are no sublists." |
| 295 | (let ((new-list (list t))) | 295 | (let ((new-list (list t))) |
| 296 | (eshell-for a args | 296 | (eshell-for a args |
| 297 | (if (and (not (eq a nil)) | 297 | (if (and (listp a) |
| 298 | (listp a) | ||
| 299 | (listp (cdr a))) | 298 | (listp (cdr a))) |
| 300 | (nconc new-list (eshell-flatten-list a)) | 299 | (nconc new-list (eshell-flatten-list a)) |
| 301 | (nconc new-list (list a)))) | 300 | (nconc new-list (list a)))) |