Mercurial > emacs
changeset 102100:f4d8e2387c06
* 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)
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Wed, 18 Feb 2009 09:23:28 +0000 |
| parents | 9460415e0ed4 |
| children | 93915a70e1a4 |
| files | lisp/ChangeLog lisp/progmodes/cc-menus.el |
| diffstat | 2 files changed, 7 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Wed Feb 18 08:31:09 2009 +0000 +++ b/lisp/ChangeLog Wed Feb 18 09:23:28 2009 +0000 @@ -1,3 +1,10 @@ +2009-02-18 Juanma Barranquero <lekktu@gmail.com> + + * 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) + 2009-02-18 Glenn Morris <rgm@gnu.org> * mail/rmail.el (rmail-get-new-mail-filter-spam):
--- a/lisp/progmodes/cc-menus.el Wed Feb 18 08:31:09 2009 +0000 +++ b/lisp/progmodes/cc-menus.el Wed Feb 18 09:23:28 2009 +0000 @@ -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 @@ ;; (classcount 0) toplist - stupid str str2 (intflen (length "@interface")) @@ -330,10 +328,8 @@ '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 @@ methodlist) toplist)) methodlist nil)))) ;; - (imenu-progress-message stupid 100) (if (eq (car toplist) nil) (setq toplist (cdr toplist)))