# HG changeset patch
# User John Wiegley <johnw@newartisans.com>
# Date 989465331 0
# Node ID 08f6bad878f881cf484af2e36a0ad4b25c0e3072
# Parent  2b50df29a117777136175677431c0783aa1f2b5f
(eshell-add-to-history): Reference to `eshell-history-ring' needed to
be `eshell-history-index'.

diff -r 2b50df29a117 -r 08f6bad878f8 lisp/eshell/em-hist.el
--- a/lisp/eshell/em-hist.el	Thu May 10 03:27:46 2001 +0000
+++ b/lisp/eshell/em-hist.el	Thu May 10 03:28:51 2001 +0000
@@ -374,7 +374,7 @@
 		   (ring-empty-p eshell-history-ring)
 		   (not (string-equal (eshell-get-history 0) input))))
 	  (eshell-put-history input))
-      (setq eshell-save-history-index eshell-history-ring)
+      (setq eshell-save-history-index eshell-history-index)
       (setq eshell-history-index nil))))
 
 (defun eshell-read-history (&optional filename silent)