diff options
| author | Richard M. Stallman <[email protected]> | 1994-06-27 20:54:14 +0000 |
|---|---|---|
| committer | Richard M. Stallman <[email protected]> | 1994-06-27 20:54:14 +0000 |
| commit | dfbf6104bdc9ce794199c9a5d49c45d9c910362e (patch) | |
| tree | ba6dab67d2ddddbc78cea0e8fc36cbc944c9dd88 | |
| parent | f4a3a8c96b85a3dae9fd6bf18523fee6b6675272 (diff) | |
(Info-insert-dir): Capitalize `node' when inserting it.
(Info-search): Don't move point to beginning, after Info-read-subfile.
| -rw-r--r-- | lisp/info.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/info.el b/lisp/info.el index 122b4ab4e9..faf478ea83 100644 --- a/lisp/info.el +++ b/lisp/info.el @@ -469,7 +469,7 @@ In standalone mode, \\<Info-mode-map>\\[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-mode-map>\\[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 |