procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* lisp/info.el (Info-read-subfile): Use (point-min) instead of (point)

Browse source 
to not add the length of the summary segment to the return value.

Fixes: debbugs:14125
This commit is contained in:
Juri Linkov 2013-05-05 11:48:44 +03:00
parent a37d34f3b4
commit d44014cb5d
2 changed files with 10 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/ChangeLog
View file

@ -1,3 +1,9 @@
2013-05-05 Juri Linkov <juri@jurta.org>
* info.el (Info-read-subfile): Use (point-min) instead of (point)
to not add the length of the summary segment to the return value.
(Bug#14125)
2013-05-05 Leo Liu <sdl.web@gmail.com>
* progmodes/octave.el (inferior-octave-strip-ctrl-g)

5
lisp/info.el
View file

@ -1530,11 +1530,14 @@ a case-insensitive match is tried."
;; Widen in case we are in the same subfile as before.
(widen)
(goto-char (point-min))
;; Skip the summary segment for `Info-search'.
(if (looking-at "\^_")
(forward-char 1)
(search-forward "\n\^_"))
;; Don't add the length of the skipped summary segment to
;; the value returned to `Info-find-node-2'. (Bug#14125)
(if (numberp nodepos)
(+ (- nodepos lastfilepos) (point)))))
(+ (- nodepos lastfilepos) (point-min)))))
(defun Info-unescape-quotes (value)
"Unescape double quotes and backslashes in VALUE."