From 2c762cee38dfa162d5de5e78e1c7d4880ccec057 Mon Sep 17 00:00:00 2001 From: John Wiegley Date: Tue, 22 Oct 2002 18:22:24 +0000 Subject: [PATCH] Bob Halley : (eshell-set-output-handle): Fix so that multiple redirection can work. --- lisp/eshell/esh-io.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/eshell/esh-io.el b/lisp/eshell/esh-io.el index d458bad0665..fad9df29bbc 100644 --- a/lisp/eshell/esh-io.el +++ b/lisp/eshell/esh-io.el @@ -396,7 +396,7 @@ it defaults to `insert'." (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))))) -- 2.39.2