# HG changeset patch # User Stefan Monnier # Date 1079578131 0 # Node ID ae0720c5c65ccc37b899940eb99df9c8ba6b49c0 # Parent 1801d78c3f81d9c45c442f15e52af3debb6ce6a5 (log-edit-font-lock-keywords): New var. (log-edit-mode): Use it. diff -r 1801d78c3f81 -r ae0720c5c65c lisp/log-edit.el --- a/lisp/log-edit.el Thu Mar 18 02:48:20 2004 +0000 +++ b/lisp/log-edit.el Thu Mar 18 02:48:51 2004 +0000 @@ -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 ;; Keywords: pcl-cvs cvs commit log @@ -299,6 +299,11 @@ ;;; 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 @@ 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)