# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 760855430 0
# Node ID 044cb853edbd67c9793481b731156c4c86d21633
# Parent  321b22a46f7aa7c81d82a9742b3caae48e291cf3
(lisp-font-lock-keywords-2): Quote the * in let*.

diff -r 321b22a46f7a -r 044cb853edbd lisp/font-lock.el
--- a/lisp/font-lock.el	Thu Feb 10 04:38:58 1994 +0000
+++ b/lisp/font-lock.el	Thu Feb 10 04:43:50 1994 +0000
@@ -465,7 +465,7 @@
    '(;;
      ;; Highlight control structures
      ("(\\(cond\\|if\\|when\\|unless\\|[ec]?\\(type\\)?case\\)[ \t\n]" . 1)
-     ("(\\(while\\|do\\|let*?\\|flet\\|labels\\|prog[nv12*]?\\)[ \t\n]" . 1)
+     ("(\\(while\\|do\\|let\\*?\\|flet\\|labels\\|prog[nv12*]?\\)[ \t\n]" . 1)
      ("(\\(catch\\|\\throw\\|block\\|return\\|return-from\\)[ \t\n]" . 1)
      ("(\\(save-restriction\\|save-window-restriction\\)[ \t\n]" . 1)
      ("(\\(save-excursion\\|unwind-protect\\|condition-case\\)[ \t\n]" . 1)