]> code.delx.au - gnu-emacs/blobdiff - lisp/font-lock.el
Use octave-help-mode for the Octave Help buffer
[gnu-emacs] / lisp / font-lock.el
index 9436012ee59dbe21165299c7ca0c906299a972e6..4dccfcb9ac7b62702b8d6f1955970c1a1a30549d 100644 (file)
@@ -2298,7 +2298,7 @@ in which C preprocessor directives are used. e.g. `asm-mode' and
                 "with-selected-window" "with-selected-frame"
                 "with-silent-modifications" "with-syntax-table"
                 "with-temp-buffer" "with-temp-file" "with-temp-message"
-                "with-timeout" "with-timeout-handler" "with-wrapper-hook") t)
+                "with-timeout" "with-timeout-handler") t)
          "\\_>")
          .  1)
        ;; Control structures.  Common Lisp forms.
@@ -2323,12 +2323,12 @@ in which C preprocessor directives are used. e.g. `asm-mode' and
          "\\_>")
          . 1)
        ;; Exit/Feature symbols as constants.
-       (,(concat "(\\(catch\\|throw\\|featurep\\|provide\\|require\\)\\>"
+       (,(concat "(\\(catch\\|throw\\|featurep\\|provide\\|require\\)\\_>"
                 "[ \t']*\\(\\(?:\\sw\\|\\s_\\)+\\)?")
        (1 font-lock-keyword-face)
        (2 font-lock-constant-face nil t))
        ;; Erroneous structures.
-       ("(\\(abort\\|assert\\|warn\\|check-type\\|cerror\\|error\\|signal\\)\\>" 1 font-lock-warning-face)
+       ("(\\(abort\\|assert\\|warn\\|check-type\\|cerror\\|error\\|signal\\)\\_>" 1 font-lock-warning-face)
        ;; Words inside \\[] tend to be for `substitute-command-keys'.
        ("\\\\\\\\\\[\\(\\(?:\\sw\\|\\s_\\)+\\)\\]"
         (1 font-lock-constant-face prepend))