Mercurial > hg > xemacs-beta
comparison lisp/packages/compile.el @ 6:27bc7f280385 r19-15b4
Import from CVS: tag r19-15b4
author | cvs |
---|---|
date | Mon, 13 Aug 2007 08:47:15 +0200 |
parents | b82b59fe008d |
children | 0293115a14e9 |
comparison
equal
deleted
inserted
replaced
5:49b78a777eb4 | 6:27bc7f280385 |
---|---|
301 (defvar compile-history nil) | 301 (defvar compile-history nil) |
302 ;; History of grep commands. | 302 ;; History of grep commands. |
303 (defvar grep-history nil) | 303 (defvar grep-history nil) |
304 | 304 |
305 ;; XEmacs | 305 ;; XEmacs |
306 (defconst compilation-font-lock-keywords (purecopy | 306 (defvar compilation-font-lock-keywords (purecopy |
307 (list | 307 (list |
308 '("^[-_.\"A-Za-z0-9/+]+\\(:\\|, line \\)[0-9]+: \\([wW]arning:\\).*$" . | 308 '("^[-_.\"A-Za-z0-9/+]+\\(:\\|, line \\)[0-9]+: \\([wW]arning:\\).*$" . |
309 font-lock-keyword-face) | 309 font-lock-keyword-face) |
310 '("^[-_.\"A-Za-z0-9/+]+\\(: *\\|, line \\)[0-9]+:.*$" . font-lock-function-name-face) | 310 '("^[-_.\"A-Za-z0-9/+]+\\(: *\\|, line \\)[0-9]+:.*$" . font-lock-function-name-face) |
311 '("^[^:\n]+-[a-zA-Z][^:\n]+$" . font-lock-doc-string-face) | 311 '("^[^:\n]+-[a-zA-Z][^:\n]+$" . font-lock-doc-string-face) |