[Emacs-diffs] Changes to emacs/lisp/eshell/esh-io.el

[Miles Bader]

Index: emacs/lisp/eshell/esh-io.el
diff -c emacs/lisp/eshell/esh-io.el:1.6 emacs/lisp/eshell/esh-io.el:1.7
*** emacs/lisp/eshell/esh-io.el:1.6     Sat Feb 16 04:42:53 2002
--- emacs/lisp/eshell/esh-io.el Tue Oct 22 14:22:24 2002
***************
*** 396,402 ****
        (if (and (listp current)
                 (not (member where current)))
            (setq current (append current (list where)))
!         (setq current where))
        (if (not (aref eshell-current-handles index))
            (aset eshell-current-handles index (cons nil 1)))
        (setcar (aref eshell-current-handles index) current)))))
--- 396,402 ----
        (if (and (listp current)
                 (not (member where current)))
            (setq current (append current (list 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)))))