changeset 48887:e846f8d1619c

(Info-dir-remove-duplicates): Avoid infloop when deleting last entry.
author John Paul Wallington <jpw@pobox.com>
date Wed, 18 Dec 2002 05:16:09 +0000
parents f016200d5069
children f0df5f687c15
files lisp/ChangeLog lisp/info.el
diffstat 2 files changed, 6 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Wed Dec 18 02:44:24 2002 +0000
+++ b/lisp/ChangeLog	Wed Dec 18 05:16:09 2002 +0000
@@ -1,3 +1,8 @@
+2002-12-18  John Paul Wallington  <jpw@shootybangbang.com>
+
+	* info.el (Info-dir-remove-duplicates): Avoid infloop when
+	deleting last entry.
+
 2002-12-17  Nick Roberts  <nick@nick.uklinux.net>
 
 	* gdb-ui.el (gdba-marker-filter, gdb-output-burst): Merge and
--- a/lisp/info.el	Wed Dec 18 02:44:24 2002 +0000
+++ b/lisp/info.el	Wed Dec 18 05:16:09 2002 +0000
@@ -967,7 +967,7 @@
 	  	(if (member-ignore-case x seen)
 	  	    (delete-region (match-beginning 0)
 	  			   (progn (re-search-forward "^[^ \t]" nil t)
-	  				  (goto-char (match-beginning 0))))
+	  				  (match-beginning 0)))
 	  	  (push x seen))))))))))
 
 ;; Note that on entry to this function the current-buffer must be the