From dfbf6104bdc9ce794199c9a5d49c45d9c910362e Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 27 Jun 1994 20:54:14 +0000 Subject: [PATCH] (Info-insert-dir): Capitalize `node' when inserting it. (Info-search): Don't move point to beginning, after Info-read-subfile. --- lisp/info.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/info.el b/lisp/info.el index 122b4ab4e9f..faf478ea836 100644 --- a/lisp/info.el +++ b/lisp/info.el @@ -469,7 +469,7 @@ In standalone mode, \\\\[Info-exit] exits Emacs itself." (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 @@ In standalone mode, \\\\[Info-exit] exits Emacs itself." (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