From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Thu, 18 Mar 2004 02:48:51 +0000 (+0000)
Subject: (log-edit-font-lock-keywords): New var.
X-Git-Tag: ttn-vms-21-2-B4~7227
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=165a7fbe6655561aeb78fd2856b60f4c83d9c635;p=emacs.git

(log-edit-font-lock-keywords): New var.
(log-edit-mode): Use it.
---

diff --git a/lisp/log-edit.el b/lisp/log-edit.el
index fa7ea4e842d..99ff6cc1586 100644
--- a/lisp/log-edit.el
+++ b/lisp/log-edit.el
@@ -1,6 +1,6 @@
 ;;; log-edit.el --- Major mode for editing CVS commit messages
 
-;; Copyright (C) 1999,2000,2003  Free Software Foundation, Inc.
+;; Copyright (C) 1999,2000,2003,2004  Free Software Foundation, Inc.
 
 ;; Author: Stefan Monnier <monnier@cs.yale.edu>
 ;; Keywords: pcl-cvs cvs commit log
@@ -299,6 +299,11 @@ automatically."
 ;;; Actual code
 ;;;
 
+(defar log-edit-font-lock-keywords
+  '(("\\`\\(Summary:\\)\\(.*\\)"
+     (1 font-lock-keyword-face)
+     (2 font-lock-function-name-face))))
+
 ;;;###autoload
 (defun log-edit (callback &optional setup listfun buffer &rest ignore)
   "Setup a buffer to enter a log message.
@@ -337,6 +342,8 @@ the package from which this is used might also provide additional
 commands (under C-x v for VC, for example).
 
 \\{log-edit-mode-map}"
+  (set (make-local-variable 'font-lock-defaults)
+       '(log-edit-font-lock-keywords t))
   (make-local-variable 'log-edit-comment-ring-index))
 
 (defun log-edit-hide-buf (&optional buf where)