summaryrefslogtreecommitdiff
path: root/lisp/progmodes/cc-menus.el
diff options
context:
space:
mode:
authorJuanma Barranquero <lekktu@gmail.com>2009-02-18 09:23:28 +0000
committerJuanma Barranquero <lekktu@gmail.com>2009-02-18 09:23:28 +0000
commit0d3e93a66f621c5229c14df56a31c7f19ed52251 (patch)
treee5359e3a92bf86a5d58aa13ed5b972fa897af544 /lisp/progmodes/cc-menus.el
parenta51092ee073ef1d40c3ebc4707541840b98c2bf2 (diff)
downloademacs-0d3e93a66f621c5229c14df56a31c7f19ed52251.tar.gz
* progmodes/cc-menus.el (imenu-progress-message):
Remove bogus cc-bytecomp-defun. (cc-imenu-objc-function): Don't call `imenu-progress-message'. Don't let-bind variable `stupid'. (Bug#1638)
Diffstat (limited to 'lisp/progmodes/cc-menus.el')
-rw-r--r--lisp/progmodes/cc-menus.el5
1 files changed, 0 insertions, 5 deletions
diff --git a/lisp/progmodes/cc-menus.el b/lisp/progmodes/cc-menus.el
index da3997a4603..b151bd0244f 100644
--- a/lisp/progmodes/cc-menus.el
+++ b/lisp/progmodes/cc-menus.el
@@ -47,7 +47,6 @@
(cc-bytecomp-defvar imenu-case-fold-search)
(cc-bytecomp-defvar imenu-generic-expression)
(cc-bytecomp-defvar imenu-create-index-function)
-(cc-bytecomp-defun imenu-progress-message)
;; imenu integration
@@ -316,7 +315,6 @@ Example:
;;
(classcount 0)
toplist
- stupid
str
str2
(intflen (length "@interface"))
@@ -330,10 +328,8 @@ Example:
'buffer-substring-no-properties
'buffer-substring)))
(goto-char (point-max))
- (imenu-progress-message stupid 0)
;;
(while (re-search-backward cc-imenu-objc-generic-expression nil t)
- (imenu-progress-message stupid)
(setq langnum (if (match-beginning OBJC)
OBJC
(cond
@@ -385,7 +381,6 @@ Example:
methodlist) toplist))
methodlist nil))))
;;
- (imenu-progress-message stupid 100)
(if (eq (car toplist) nil)
(setq toplist (cdr toplist)))