(Info-insert-dir): Capitalize `node' when inserting it.

(Info-search): Don't move point to beginning, after Info-read-subfile.

diff --git a/lisp/info.el b/lisp/info.el
index 122b4ab4e9f21e7e73e7a953629d9f7af0d7f996..faf478ea83613113608e01f2dc019904ea6fcdc7 100644 (file)
--- 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