summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2007-12-11 05:52:07 +0000
committerGlenn Morris <rgm@gnu.org>2007-12-11 05:52:07 +0000
commite49337eabb2f1d16999f9329b287ca43d68c47cf (patch)
treebc7e3cd6a8e9ac03e532752ef942e24c2982e934 /lisp/emacs-lisp
parent9824ded5dded6f1d25ba7c71d959d56ac2f10e7e (diff)
downloademacs-e49337eabb2f1d16999f9329b287ca43d68c47cf.tar.gz
emacs-e49337eabb2f1d16999f9329b287ca43d68c47cf.tar.bz2
emacs-e49337eabb2f1d16999f9329b287ca43d68c47cf.zip
(check-declare-verify): Handle deffoo.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/check-declare.el6
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/check-declare.el b/lisp/emacs-lisp/check-declare.el
index 9fc8a9e61e7..fe7f774c7e9 100644
--- a/lisp/emacs-lisp/check-declare.el
+++ b/lisp/emacs-lisp/check-declare.el
@@ -34,6 +34,9 @@
;;; TODO:
+;; 1. Warn about functions marked as obsolete, eg
+;; password-read-and-add in smime.el.
+
;;; Code:
(defconst check-declare-warning-buffer "*Check Declarations Warnings*"
@@ -141,7 +144,8 @@ is a string giving details of the error."
;; defsubst's don't _have_ to be known at compile time.
(setq re (format (if cflag
"^[ \t]*\\(DEFUN\\)[ \t]*([ \t]*\"%s\""
- "^[ \t]*(\\(fset[ \t]+'\\|def\\(?:un\\|subst\\|\
+ "^[ \t]*(\\(fset[ \t]+'\\|\
+def\\(?:un\\|subst\\|foo\\|\
ine-\\(?:derived\\|generic\\|\\(?:global\\(?:ized\\)?-\\)?minor\\)-mode\
\\|\\(?:ine-obsolete-function-\\)?alias[ \t]+'\\)\\)\
\[ \t]*%s\\([ \t;]+\\|$\\)")