.emacs
changeset 20 fde58d93c047
parent 19 a8e7a6e94341
child 21 f4448d2863d6
--- a/.emacs	Fri Apr 18 00:04:50 2008 +0300
+++ b/.emacs	Fri Apr 18 00:04:51 2008 +0300
@@ -686,6 +686,10 @@
 ;; compilation window shall scroll down if not 0
 (setq compilation-scroll-output 1)
 
+;; XXX нужно реализовать через hook.
+(require 'compile)
+(add-to-list 'compilation-mode-font-lock-keywords '("\\(/[Oo][Uu][Tt]:[^ 	]+\\)" . 1))
+(add-to-list 'compilation-mode-font-lock-keywords '("[ 	]\\(/F[oe][^ 	]+\\)" . 1))
 
 ;; ----------------------------------------------------------------------
 ;; asm