From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 10 Feb 2005 06:45:26 +0000 (+0000)
Subject: (font-lock-default-function): Use with-no-warnings.
X-Git-Tag: ttn-vms-21-2-B4~2339
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=723c911c93ca003d3c0cfb94bb3deea4f5ca949e;p=emacs.git

(font-lock-default-function): Use with-no-warnings.
---

diff --git a/lisp/font-core.el b/lisp/font-core.el
index bbe1961e51e..ea1880baac7 100644
--- a/lisp/font-core.el
+++ b/lisp/font-core.el
@@ -203,7 +203,8 @@ this function onto `change-major-mode-hook'."
   ;; `font-lock-defaults'.
   (when (or font-lock-defaults
 	    (and (boundp 'font-lock-keywords) font-lock-keywords)
-	    (cdr (assq major-mode font-lock-defaults-alist)))
+	    (with-no-warnings
+	     (cdr (assq major-mode font-lock-defaults-alist))))
     (font-lock-mode-internal mode)))
 
 (defun turn-on-font-lock ()