# HG changeset patch # User Simon Marshall # Date 781952127 0 # Node ID 7a8a379513e4fac51b9e3cf222cfe58838399da5 # Parent 59901c9aa208cfe198211b17bd8256410496f990 * makefile.el: (makefile-mode-syntax-table): Made `'' and ``' be strings, and `#' be a comment. (makefile-font-lock-keywords): Add variable reference regexp. (makefile-mode): Set font-lock-defaults. diff -r 59901c9aa208 -r 7a8a379513e4 lisp/progmodes/make-mode.el --- a/lisp/progmodes/make-mode.el Wed Oct 12 08:24:50 1994 +0000 +++ b/lisp/progmodes/make-mode.el Wed Oct 12 08:55:27 1994 +0000 @@ -14,7 +14,7 @@ ;; So, for the meantime, this is not the default mode for makefiles. -;; $Id: makefile.el,v 1.16 1994/05/22 22:10:39 rms Exp $ +;; $Id: makefile.el,v 1.17 1994/10/11 20:42:23 rms Exp simon $ ;; This file is part of GNU Emacs. @@ -207,11 +207,14 @@ (defconst makefile-font-lock-keywords (list - ;; Do macro assignments. These get the "type" face rather + ;; Do macro assignments. These get the "variable-name" face rather ;; arbitrarily. - (list makefile-macroassign-regex 1 'font-lock-type-face) - - ;; Do dependencies. These get the function name face. + (list makefile-macroassign-regex 1 'font-lock-variable-name-face) + ;; + ;; Variable references even in targets/strings/comments: + '("\\$[({]\\([a-zA-Z0-9_]+\\)[})]" 1 font-lock-reference-face t) + ;; + ;; Do dependencies. These get the function name face. (list makefile-dependency-regex 1 'font-lock-function-name-face))) ;;; ------------------------------------------------------------ @@ -326,6 +329,8 @@ (modify-syntax-entry ?\] "([ " makefile-mode-syntax-table) (modify-syntax-entry ?\{ "(} " makefile-mode-syntax-table) (modify-syntax-entry ?\} "){ " makefile-mode-syntax-table) + (modify-syntax-entry ?\' "\" " makefile-mode-syntax-table) + (modify-syntax-entry ?\` "\" " makefile-mode-syntax-table) (modify-syntax-entry ?# "< " makefile-mode-syntax-table) (modify-syntax-entry ?\n "> " makefile-mode-syntax-table)) @@ -478,10 +483,8 @@ (make-local-variable 'makefile-need-macro-pickup) ;; Font lock. - (make-local-variable 'font-lock-keywords) - (setq font-lock-keywords makefile-font-lock-keywords) - (make-local-variable 'font-lock-keywords-case-fold-search) - (setq font-lock-keywords-case-fold-search t) + (make-local-variable 'font-lock-defaults) + (setq font-lock-defaults '(makefile-font-lock-keywords)) ;; Add-log. (make-local-variable 'add-log-current-defun-function)