diff options
| author | Richard M. Stallman <[email protected]> | 2004-08-22 16:53:44 +0000 |
|---|---|---|
| committer | Richard M. Stallman <[email protected]> | 2004-08-22 16:53:44 +0000 |
| commit | 7ea820e9850de8cf9d66bed4e7e2915a3937472e (patch) | |
| tree | 6607818e59a99d464cdd1828b44df66638b41a4c | |
| parent | 2dd718b66b14bdf0a7438856bbdc32289953bb75 (diff) | |
(font-lock-set-defaults): Use with-no-warnings.
| -rw-r--r-- | lisp/font-lock.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/font-lock.el b/lisp/font-lock.el index 8cb43bc0bd..052e92391a 100644 --- a/lisp/font-lock.el +++ b/lisp/font-lock.el @@ -1516,7 +1516,9 @@ Sets various variables using `font-lock-defaults' (or, if nil, using (make-local-variable 'font-lock-fontified) (make-local-variable 'font-lock-multiline) (let* ((defaults (or font-lock-defaults - (cdr (assq major-mode font-lock-defaults-alist)))) + (cdr (assq major-mode + (with-no-warnings + font-lock-defaults-alist))))) (keywords (font-lock-choose-keywords (nth 0 defaults) (font-lock-value-in-major-mode font-lock-maximum-decoration))) |