changeset 47971:526a8d279adb

Bob Halley <halley@play-bow.org>: (eshell-set-output-handle): Fix so that multiple redirection can work.
author John Wiegley <johnw@newartisans.com>
date Tue, 22 Oct 2002 18:22:24 +0000
parents 739a7a89fa55
children 287494c5e770
files lisp/eshell/esh-io.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/eshell/esh-io.el	Tue Oct 22 18:21:36 2002 +0000
+++ b/lisp/eshell/esh-io.el	Tue Oct 22 18:22:24 2002 +0000
@@ -396,7 +396,7 @@
 	(if (and (listp current)
 		 (not (member where current)))
 	    (setq current (append current (list where)))
-	  (setq current where))
+	  (setq current (list where)))
 	(if (not (aref eshell-current-handles index))
 	    (aset eshell-current-handles index (cons nil 1)))
 	(setcar (aref eshell-current-handles index) current)))))