mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-03-03 04:21:28 -08:00
Code Issues Projects Releases Wiki Activity

(imenu--generic-function): Use markers for positions.

Browse source
This commit is contained in:
Richard M. Stallman 1996-09-19 04:25:40 +00:00
parent 6b5d3b89ee
commit cbcf50d2c2
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/imenu.el
View file

@ -640,8 +640,9 @@ pattern.
(index (caddr pat)))
(if (and (not found) ; Only allow one entry;
(looking-at regexp))
(let ((beg (match-beginning index))
(let ((beg (make-marker))
(end (match-end index)))
(set-marker beg (match-beginning index))
(setq found t)
(push
(cons (buffer-substring-no-properties beg end) beg)