diff options
| author | Richard M. Stallman <rms@gnu.org> | 1996-09-19 04:25:40 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1996-09-19 04:25:40 +0000 |
| commit | cbcf50d2c2d65a55396ab0fc1501588738ccd31c (patch) | |
| tree | 1e48f346eabb974ef8920f3667f0e81d8657c139 /lisp/imenu.el | |
| parent | 6b5d3b89ee6e1e4dde2f2d0d0902fe1c7b2f03a9 (diff) | |
| download | emacs-cbcf50d2c2d65a55396ab0fc1501588738ccd31c.tar.gz emacs-cbcf50d2c2d65a55396ab0fc1501588738ccd31c.tar.bz2 emacs-cbcf50d2c2d65a55396ab0fc1501588738ccd31c.zip | |
(imenu--generic-function): Use markers for positions.
Diffstat (limited to 'lisp/imenu.el')
| -rw-r--r-- | lisp/imenu.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/imenu.el b/lisp/imenu.el index 323a279efef..876f6f2f061 100644 --- a/lisp/imenu.el +++ b/lisp/imenu.el @@ -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) |