diff options
author | Richard M. Stallman <rms@gnu.org> | 1994-09-19 05:11:40 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1994-09-19 05:11:40 +0000 |
commit | f98eae9b10ae4b43451941daebad31efafc451a4 (patch) | |
tree | 650fbe5d23ffec1ea07b1f1f0de4bf8dd3cf3bfb /lisp/info.el | |
parent | 47503dadc27b8d893cee0fd14bad369a1e47eab0 (diff) | |
download | emacs-f98eae9b10ae4b43451941daebad31efafc451a4.tar.gz |
(Info-insert-dir): Insert newlines before rather than
after nodes copied from other files, for consistency.
Diffstat (limited to 'lisp/info.el')
-rw-r--r-- | lisp/info.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/info.el b/lisp/info.el index b07c8930c81..2396ba62bb4 100644 --- a/lisp/info.el +++ b/lisp/info.el @@ -475,14 +475,14 @@ In standalone mode, \\<Info-mode-map>\\[Info-exit] exits Emacs itself." nil t) (progn (search-forward "\n\^_" nil 'move) - (beginning-of-line)) + (beginning-of-line) + (insert "\n")) ;; If none exists, add one. (goto-char (point-max)) (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))) - (insert "\n")) + (apply 'insert-buffer-substring (cdr (car nodes)))) (setq nodes (cdr nodes))) ;; Kill all the buffers we just made. (while buffers |