diff options
-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) |