Mercurial > emacs

changeset 38225:5d26670f49df

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Info-clone-buffer-hook): Unconditionally copy marker.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Thu, 28 Jun 2001 21:17:20 +0000
parents b304c4a260bd
children 7ee172ed0239
files lisp/info.el
diffstat 1 files changed, 5 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/info.el	Thu Jun 28 16:31:51 2001 +0000
+++ b/lisp/info.el	Thu Jun 28 21:17:20 2001 +0000
@@ -2311,10 +2311,11 @@
     (setq Info-tag-table-buffer
 	  (with-current-buffer Info-tag-table-buffer (clone-buffer)))
     (let ((m Info-tag-table-marker))
-      (when (and (markerp m) (marker-position m))
-	(setq Info-tag-table-marker
-	      (with-current-buffer Info-tag-table-buffer
-		(copy-marker (marker-position m))))))))
+      (setq Info-tag-table-marker
+	    (if (and (markerp m) (marker-position m))
+		(with-current-buffer Info-tag-table-buffer
+		  (copy-marker (marker-position m)))
+	      (make-marker))))))
 
 (defvar Info-edit-map (let ((map (make-sparse-keymap)))
 			(set-keymap-parent map text-mode-map)