diff options
| author | Richard M. Stallman <rms@gnu.org> | 2003-06-04 09:48:50 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 2003-06-04 09:48:50 +0000 |
| commit | 9b45407516b1da3c10225ca661225efeae4c3d3b (patch) | |
| tree | 923cecc7d2c3476471d835fd064bc2398d7a9528 /lisp/emacs-lisp/lisp-mnt.el | |
| parent | 77887832026b73dd1ff98e849367e30220d70e3b (diff) | |
| download | emacs-9b45407516b1da3c10225ca661225efeae4c3d3b.tar.gz | |
(lm-keywords-finder-p): Use with-no-warnings.
Diffstat (limited to 'lisp/emacs-lisp/lisp-mnt.el')
| -rw-r--r-- | lisp/emacs-lisp/lisp-mnt.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/lisp-mnt.el b/lisp/emacs-lisp/lisp-mnt.el index d282f452456..18967677b38 100644 --- a/lisp/emacs-lisp/lisp-mnt.el +++ b/lisp/emacs-lisp/lisp-mnt.el @@ -456,7 +456,8 @@ This can be found in an RCS or SCCS header." (let ((keys (lm-keywords-list file))) (catch 'keyword-found (while keys - (if (assoc (intern (car keys)) finder-known-keywords) + (if (assoc (intern (car keys)) + (with-no-warnings finder-known-keywords)) (throw 'keyword-found t)) (setq keys (cdr keys))) nil))) |