changeset 18137:985e47a14cab

(Info-tagify): Don't set Info-tag-table-marker if not in Info mode.
author Richard M. Stallman <rms@gnu.org>
date Wed, 04 Jun 1997 04:09:28 +0000
parents 015e9e4a90ed
children fa4eb2f6b05a
files lisp/informat.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/informat.el	Wed Jun 04 00:56:08 1997 +0000
+++ b/lisp/informat.el	Wed Jun 04 04:09:28 1997 +0000
@@ -71,7 +71,8 @@
 		      (delete-region (point) end)))
 		(goto-char (point-max))
 		(insert "\^_\f\nTag table:\n")
-		(move-marker Info-tag-table-marker (point))
+		(if (eq major-mode 'info-mode)
+		    (move-marker Info-tag-table-marker (point)))
 		(setq list (nreverse list))
 		(while list
 		  (insert "Node: " (car (car list)) ?\177)