changeset 8069:dfef58fcda75

(Info-insert-dir): Capitalize `node' when inserting it. (Info-search): Don't move point to beginning, after Info-read-subfile.
author Richard M. Stallman <rms@gnu.org>
date Mon, 27 Jun 1994 20:54:14 +0000
parents 40e02f4c8ae1
children 6f2b80526abc
files lisp/info.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/info.el	Mon Jun 27 20:44:08 1994 +0000
+++ b/lisp/info.el	Mon Jun 27 20:54:14 1994 +0000
@@ -469,7 +469,7 @@
 		(beginning-of-line))
 	    ;; If none exists, add one.
 	    (goto-char (point-max))
-	    (insert "\^_\nFile: dir\tnode: " nodename "\n\n* Menu:\n\n"))
+	    (insert "\^_\nFile: dir\tNode: " nodename "\n\n* Menu:\n\n"))
 	  ;; Merge the text from the other buffer's menu
 	  ;; into the menu in the like-named node in the main buffer.
 	  (apply 'insert-buffer-substring (cdr (car nodes)))
@@ -677,7 +677,7 @@
 		(message "Searching subfile %s..." (cdr (car list)))
 		(Info-read-subfile (car (car list)))
 		(setq list (cdr list))
-		(goto-char (point-min))
+;;		(goto-char (point-min))
 		(if (re-search-forward regexp nil t)
 		    (setq found (point) list ())))
 	      (if found