[nongnu] elpa/forth-mode 4868a0ff03 051/153: Fix for imenu integration.

[ELPA Syncer]

branch: elpa/forth-mode
commit 4868a0ff03e0cfec2f1937856ed078432a8db711
Author: Lars Brinkhoff <lars.brinkhoff@delphi.com>
Commit: Lars Brinkhoff <lars.brinkhoff@delphi.com>

    Fix for imenu integration.
---
 forth-mode.el | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/forth-mode.el b/forth-mode.el
index 19467fb58c..ea08fe29d5 100644
--- a/forth-mode.el
+++ b/forth-mode.el
@@ -70,10 +70,11 @@
 
 (defun forth-expand-symbol ()
   (let ((list (forth-words)))
-    (dolist (index (imenu--make-index-alist t))
-      (when (listp (rest index))
-       (dolist (def (rest index))
-         (push (car def) list))))
+    (when (fboundp 'imenu--make-index-alist)
+      (dolist (index (imenu--make-index-alist t))
+       (when (listp (rest index))
+         (dolist (def (rest index))
+           (push (car def) list)))))
     (list (forth-symbol-start) (forth-symbol-end) list)))
 
 (defun forth-block-p ()