From 165a7fbe6655561aeb78fd2856b60f4c83d9c635 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Thu, 18 Mar 2004 02:48:51 +0000 Subject: [PATCH] (log-edit-font-lock-keywords): New var. (log-edit-mode): Use it. --- lisp/log-edit.el | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) 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 ;; 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) -- 2.39.2