Commit 4ce5c223 authored by Stefan Monnier's avatar Stefan Monnier
Browse files

(Info-clone-buffer-hook): Really unconditionally copy marker.

parent 24cc235a
2001-07-02 Stefan Monnier <monnier@cs.yale.edu>
* info.el (Info-clone-buffer-hook): Really unconditionally copy marker.
2001-07-02 Gerd Moellmann <gerd@gnu.org>
 
* emacs-lisp/cl-macs.el (cl-do-arglist): Revert change of
2000-10-15.
* emacs-lisp/cl-macs.el (cl-do-arglist): Revert change of 2000-10-15.
 
2001-07-02 Eli Zaretskii <eliz@is.elta.co.il>
 
* allout.el: Fix the header line, so that finder.el recognizes it.
From Pavel Jan,Bm(Bk <Pavel@Janik.cz>.
 
* emacs-lisp/lisp-mnt.el (lm-header-prefix): Doc fix. From Pavel
Jan,Bm(Bk <Pavel@Janik.cz>.
* emacs-lisp/lisp-mnt.el (lm-header-prefix): Doc fix.
From Pavel Jan,Bm(Bk <Pavel@Janik.cz>.
 
2001-06-29 Eli Zaretskii <eliz@is.elta.co.il>
 
* term/w32-win.el (x-colors): Add colors from the recent rgb.txt
file.
* term/w32-win.el (x-colors): Add colors from the recent rgb.txt file.
 
* ps-bdf.el (bdf-directory-list): Use the value relative to
installation-directory for MS-Windows as well.
......
......@@ -2309,10 +2309,11 @@ Advanced commands:
(defun Info-clone-buffer-hook ()
(when (bufferp Info-tag-table-buffer)
(setq Info-tag-table-buffer
(with-current-buffer Info-tag-table-buffer (clone-buffer)))
(with-current-buffer Info-tag-table-buffer (clone-buffer))))
(let ((m Info-tag-table-marker))
(when (markerp m)
(setq Info-tag-table-marker
(if (and (markerp m) (marker-position m))
(if (and (marker-position m) (bufferp Info-tag-table-buffer))
(with-current-buffer Info-tag-table-buffer
(copy-marker (marker-position m)))
(make-marker))))))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment