(imenu): Support integers used as positions.

1996-12-06 23:20:14 +00:00
parent ce1b4c71eb
commit 58e9d9c4bf
1 changed files with 6 additions and 0 deletions
--- a/lisp/imenu.el
+++ b/lisp/imenu.el
@@ -904,6 +904,12 @@ See `imenu-choose-buffer-index' for more information."
 	       ;; widen if outside narrowing
 	       (widen))
 	   (goto-char (cdr index-item)))
+	  ((integerp (cdr index-item))
+	   (if (or (< (cdr index-item) (point-min))
+		   (> (cdr index-item) (point-max)))
+	       ;; widen if outside narrowing
+	       (widen))
+	   (goto-char (cdr index-item)))
 	  (t
 	   ;; A special item with a function.
 	   (let ((function (cadr index-item))