summaryrefslogtreecommitdiff
path: root/lisp/imenu.el
diff options
context:
space:
mode:
authorKarl Heuer <kwzh@gnu.org>1996-12-06 23:20:14 +0000
committerKarl Heuer <kwzh@gnu.org>1996-12-06 23:20:14 +0000
commit58e9d9c4bf1886e9df2117b13b2ef8f4e6cfaf7c (patch)
tree5cc4a7a3a8f997eda047bdaa621d7656fc2d719e /lisp/imenu.el
parentce1b4c71eb15296baa9efdd6f76810b94b2e22fc (diff)
downloademacs-58e9d9c4bf1886e9df2117b13b2ef8f4e6cfaf7c.tar.gz
(imenu): Support integers used as positions.
Diffstat (limited to 'lisp/imenu.el')
-rw-r--r--lisp/imenu.el6
1 files changed, 6 insertions, 0 deletions
diff --git a/lisp/imenu.el b/lisp/imenu.el
index fbc184ae9ae..ff909cd227e 100644
--- 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))