From 3fd00dcb428281d57a65872fba2c5ab9745a01de Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 10 Jul 1998 03:19:33 +0000 Subject: [PATCH] (lisp-font-lock-keywords): Fontify `handler-case', `ccase', `ctypecase', `assert', `error'. --- lisp/font-lock.el | 1 + 1 file changed, 1 insertion(+) diff --git a/lisp/font-lock.el b/lisp/font-lock.el index 9ff63c6c18b..0d8f881c210 100644 --- a/lisp/font-lock.el +++ b/lisp/font-lock.el @@ -1956,6 +1956,7 @@ This function could be MATCHER in a MATCH-ANCHORED `font-lock-keywords' item." (cons (concat "(" (regexp-opt '("when" "unless" "case" "ecase" "typecase" "etypecase" + "ccase" "ctypecase" "handler-case" "assert" "error" "loop" "do" "do*" "dotimes" "dolist" "proclaim" "declaim" "declare" "lexical-let" "lexical-let*" "flet" "labels" -- 2.39.5