summaryrefslogtreecommitdiff
path: root/lisp/info.el
diff options
context:
space:
mode:
authorMiles Bader <miles@gnu.org>2000-11-02 01:21:11 +0000
committerMiles Bader <miles@gnu.org>2000-11-02 01:21:11 +0000
commitfb163355a4461b5d4c455d1ab2e89f9f79f4ded9 (patch)
tree76b97e39081509282307f5d511737fae46948da5 /lisp/info.el
parentbff5341176b5d940e1944eb84b4880ff924eefab (diff)
downloademacs-fb163355a4461b5d4c455d1ab2e89f9f79f4ded9.tar.gz
(Info-insert-dir): Don't include blank lines at beginning of additional
dir files (one is added automatically).
Diffstat (limited to 'lisp/info.el')
-rw-r--r--lisp/info.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/info.el b/lisp/info.el
index e02ae97a0e1..e54a579620f 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -772,6 +772,8 @@ a case-insensitive match is tried."
(while (re-search-forward "^\\* Menu:" nil t)
(let (beg nodename end)
(forward-line 1)
+ (while (and (eolp) (not (eobp)))
+ (forward-line 1))
(setq beg (point))
(or (search-backward "\n\^_" nil 'move)
(looking-at "\^_")