# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 843107140 0
# Node ID 2d2356e78b9e3c133907b4119cfdd3aa22429be3
# Parent  b311d87555301c909199d1b17d351d60ebeaaff9
(imenu--generic-function): Use markers for positions.

diff -r b311d8755530 -r 2d2356e78b9e lisp/imenu.el
--- a/lisp/imenu.el	Thu Sep 19 03:31:13 1996 +0000
+++ b/lisp/imenu.el	Thu Sep 19 04:25:40 1996 +0000
@@ -640,8 +640,9 @@
 		    (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)