Mercurial > emacs
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