* lisp/info.el (Info-file-supports-index-cookies): Increment

line-beginning-position's arg from 3 to 4 because makeinfo outputs
one more line for long file names.

Fixes: debbugs:4142

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 459e360c8d71baefa1d9f36c0b15ac75b6230128..62cdd4d61c947a3208fe55c3793d4482b8745611 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2011-09-18  Juri Linkov  <juri@jurta.org>
+
+       * info.el (Info-file-supports-index-cookies): Increment
+       line-beginning-position's arg from 3 to 4 because makeinfo outputs
+       one more line for long file names (bug#4142).
+
 2011-09-18  Chong Yidong  <cyd@stupidchicken.com>
 
        * newcomment.el (comment-normalize-vars): If prompting for

diff --git a/lisp/info.el b/lisp/info.el
index 40959885edb795221d7ef174039a3d90724e9110..42278621bbc0b9b4d07fc043ca8de58faa8b4925 100644 (file)
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -540,7 +540,7 @@ in `Info-file-supports-index-cookies-list'."
          (condition-case ()
              (if (and (re-search-forward
                        "makeinfo[ \n]version[ \n]\\([0-9]+.[0-9]+\\)"
-                       (line-beginning-position 3) t)
+                       (line-beginning-position 4) t)
                       (not (version< (match-string 1) "4.7")))
                  (setq found t))
            (error nil))