diff options
| author | Richard M. Stallman | 1998-07-10 03:19:33 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1998-07-10 03:19:33 +0000 |
| commit | 3fd00dcb428281d57a65872fba2c5ab9745a01de (patch) | |
| tree | b54e84a59c68a7048a4b2199e73a8bc95674e401 | |
| parent | 583f5d53e6ec09f57efdb4f74fbf8be794883e41 (diff) | |
| download | emacs-3fd00dcb428281d57a65872fba2c5ab9745a01de.tar.gz emacs-3fd00dcb428281d57a65872fba2c5ab9745a01de.zip | |
(lisp-font-lock-keywords): Fontify `handler-case', `ccase',
`ctypecase', `assert', `error'.
| -rw-r--r-- | lisp/font-lock.el | 1 |
1 files changed, 1 insertions, 0 deletions
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." | |||
| 1956 | (cons (concat | 1956 | (cons (concat |
| 1957 | "(" (regexp-opt | 1957 | "(" (regexp-opt |
| 1958 | '("when" "unless" "case" "ecase" "typecase" "etypecase" | 1958 | '("when" "unless" "case" "ecase" "typecase" "etypecase" |
| 1959 | "ccase" "ctypecase" "handler-case" "assert" "error" | ||
| 1959 | "loop" "do" "do*" "dotimes" "dolist" | 1960 | "loop" "do" "do*" "dotimes" "dolist" |
| 1960 | "proclaim" "declaim" "declare" | 1961 | "proclaim" "declaim" "declare" |
| 1961 | "lexical-let" "lexical-let*" "flet" "labels" | 1962 | "lexical-let" "lexical-let*" "flet" "labels" |