Font-lock `cl-flet*', too.

* lisp/emacs-lisp/lisp-mode.el (lisp-cl-font-lock-keywords-2):
Add "flet*" to intermediate var `cl-lib-kw'.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 62f3138c9d194643b4e62ad510d41a941b2142e7..0d8f7e7a8dad5fe59b12ae047bbb5ea37ed800f3 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2014-09-28  Thien-Thi Nguyen  <ttn@gnu.org>
+
+       Font-lock `cl-flet*', too.
+       * emacs-lisp/lisp-mode.el (lisp-cl-font-lock-keywords-2):
+       Add "flet*" to intermediate var `cl-lib-kw'.
+
 2014-09-27  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * epg-config.el (epg-gpg-program): Use the plain program names rather

diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el
index 57900e39bed44bb1fa26cff1fb94a0d49bbdc199..a13baf0ee22d0cfef8222197f0e47f4494bd26e8 100644 (file)
--- a/lisp/emacs-lisp/lisp-mode.el
+++ b/lisp/emacs-lisp/lisp-mode.el
@@ -233,7 +233,7 @@
                            "etypecase" "ccase" "ctypecase" "loop" "do" "do*"
                            "the" "locally" "proclaim" "declaim" "letf" "go"
                            ;; "lexical-let" "lexical-let*"
-                           "symbol-macrolet" "flet" "destructuring-bind"
+                           "symbol-macrolet" "flet" "flet*" "destructuring-bind"
                            "labels" "macrolet" "tagbody" "multiple-value-bind"
                            "block" "return" "return-from"))
               (cl-lib-errs '("assert" "check-type"))