threads / patch / 26852

patchgit.el: Don't use font-lock-compile-keywords

Subject: [PATCH] git.el: Don't use font-lock-compile-keywords

## tl;dr

6 messages between Feb 4, 2011 and Apr 4, 2011. Diffs are folded; open one to read it.

replies: 5people: 5as markdown or json

Lawrence Mitchell· Feb 4, 2011, 10:59 UTC · lore

If font-lock is disabled, font-lock-compile-keywords complains. Really what we want to do is to replace log-edit's font-lock definitions with our own, so define a major mode deriving from log-edit and set up font-lock-defaults there. We then use the optional MODE argument to log-edit to set up the major mode of the commit buffer appropriately.

Signed-Off-By: Lawrence Mitchell <wence@gmx.li>
---
I sent this before, in response to Johnathan's message of 4th Feb
(http://thread.gmane.org/gmane.comp.version-control.git/36088/focus=166038),
but it's possible it got lost in the noise.  So here it is
again.  The originally proposed patch from Debian is to use
font-lock-add-keywords rather than font-lock-compile-keywords.
However, it doesn't exist in XEmacs, if one is looking to
maintain compatibility, I believe this patch is the right thing
to do.
 contrib/emacs/git.el |   13 ++++++++++---
 1 files changed, 10 insertions(+), 3 deletions(-)
Show changes to contrib/emacs/git.el +10 −3
diff --git a/contrib/emacs/git.el b/contrib/emacs/git.el
index 214930a..65c95d9 100644
--- a/contrib/emacs/git.el
+++ b/contrib/emacs/git.el
@@ -1310,6 +1310,13 @@ The FILES list must be sorted."
       (when sign-off (git-append-sign-off committer-name committer-email)))
     buffer))
 
+(define-derived-mode git-log-edit-mode log-edit-mode "Git-Log-Edit"
+  "Major mode for editing git log messages.
+
+Set up git-specific `font-lock-keywords' for `log-edit-mode'."
+  (set (make-local-variable 'font-lock-defaults)
+       '(git-log-edit-font-lock-keywords t t)))
+
 (defun git-commit-file ()
   "Commit the marked file(s), asking for a commit message."
   (interactive)
@@ -1335,9 +1342,9 @@ The FILES list must be sorted."
         (git-setup-log-buffer buffer (git-get-merge-heads) author-name author-email subject date))
       (if (boundp 'log-edit-diff-function)
 	  (log-edit 'git-do-commit nil '((log-edit-listfun . git-log-edit-files)
-					 (log-edit-diff-function . git-log-edit-diff)) buffer)
-	(log-edit 'git-do-commit nil 'git-log-edit-files buffer))
-      (setq font-lock-keywords (font-lock-compile-keywords git-log-edit-font-lock-keywords))
+					 (log-edit-diff-function . git-log-edit-diff)) buffer 'git-log-edit-mode)
+	(log-edit 'git-do-commit nil 'git-log-edit-files buffer
+                  'git-log-edit-mode))
       (setq paragraph-separate (concat (regexp-quote git-log-msg-separator) "$\\|Author: \\|Date: \\|Merge: \\|Signed-off-by: \\|\f\\|[ 	]*$"))
       (setq buffer-file-coding-system coding-system)
       (re-search-forward (regexp-quote (concat git-log-msg-separator "\n")) nil t))))
-- 
1.7.4.rc2.18.gb20e9
Jonathan Nieder· Apr 3, 2011, 00:19 UTC · re: Lawrence Mitchell · lore

Re: [PATCH] git.el: Don't use font-lock-compile-keywords

Hi,
Lawrence Mitchell wrote:
Show 12 quoted lines
> If font-lock is disabled, font-lock-compile-keywords complains.
> Really what we want to do is to replace log-edit's font-lock
> definitions with our own, so define a major mode deriving from
> log-edit and set up font-lock-defaults there.  We then use the
> optional MODE argument to log-edit to set up the major mode of the
> commit buffer appropriately.
>
> Signed-Off-By: Lawrence Mitchell <wence@gmx.li>
> ---
> I sent this before, in response to Johnathan's message of 4th Feb
> (http://thread.gmane.org/gmane.comp.version-control.git/36088/focus=166038),
> but it's possible it got lost in the noise.

Thanks. This is way beyond my knowledge of emacs; I was just passing on Kevin's report before. Kevin, what do you think? Is it a good fix?

(For those reading between the lines: why, yes, if you would like to be maintainer of the contrib/emacs directory, we would be happy to have you. When can you start? :))

Show 9 quoted lines
> So here it is
> again.  The originally proposed patch from Debian is to use
> font-lock-add-keywords rather than font-lock-compile-keywords.
> However, it doesn't exist in XEmacs, if one is looking to
> maintain compatibility, I believe this patch is the right thing
> to do.
>
>  contrib/emacs/git.el |   13 ++++++++++---
>  1 files changed, 10 insertions(+), 3 deletions(-)
Leaving patch unsnipped for reviewers' sake.

Sorry for the slow response, Jonathan

Show 34 quoted lines
> 
> diff --git a/contrib/emacs/git.el b/contrib/emacs/git.el
> index 214930a..65c95d9 100644
> --- a/contrib/emacs/git.el
> +++ b/contrib/emacs/git.el
> @@ -1310,6 +1310,13 @@ The FILES list must be sorted."
>        (when sign-off (git-append-sign-off committer-name committer-email)))
>      buffer))
>  
> +(define-derived-mode git-log-edit-mode log-edit-mode "Git-Log-Edit"
> +  "Major mode for editing git log messages.
> +
> +Set up git-specific `font-lock-keywords' for `log-edit-mode'."
> +  (set (make-local-variable 'font-lock-defaults)
> +       '(git-log-edit-font-lock-keywords t t)))
> +
>  (defun git-commit-file ()
>    "Commit the marked file(s), asking for a commit message."
>    (interactive)
> @@ -1335,9 +1342,9 @@ The FILES list must be sorted."
>          (git-setup-log-buffer buffer (git-get-merge-heads) author-name author-email subject date))
>        (if (boundp 'log-edit-diff-function)
>  	  (log-edit 'git-do-commit nil '((log-edit-listfun . git-log-edit-files)
> -					 (log-edit-diff-function . git-log-edit-diff)) buffer)
> -	(log-edit 'git-do-commit nil 'git-log-edit-files buffer))
> -      (setq font-lock-keywords (font-lock-compile-keywords git-log-edit-font-lock-keywords))
> +					 (log-edit-diff-function . git-log-edit-diff)) buffer 'git-log-edit-mode)
> +	(log-edit 'git-do-commit nil 'git-log-edit-files buffer
> +                  'git-log-edit-mode))
>        (setq paragraph-separate (concat (regexp-quote git-log-msg-separator) "$\\|Author: \\|Date: \\|Merge: \\|Signed-off-by: \\|\f\\|[ 	]*$"))
>        (setq buffer-file-coding-system coding-system)
>        (re-search-forward (regexp-quote (concat git-log-msg-separator "\n")) nil t))))
> -- 
> 1.7.4.rc2.18.gb20e9
Alexandre Julliard· Apr 3, 2011, 17:44 UTC · re: Jonathan Nieder · lore

Re: [PATCH] git.el: Don't use font-lock-compile-keywords

Jonathan Nieder <jrnieder@gmail.com> writes:
Show 11 quoted lines
>> So here it is
>> again.  The originally proposed patch from Debian is to use
>> font-lock-add-keywords rather than font-lock-compile-keywords.
>> However, it doesn't exist in XEmacs, if one is looking to
>> maintain compatibility, I believe this patch is the right thing
>> to do.
>>
>>  contrib/emacs/git.el |   13 ++++++++++---
>>  1 files changed, 10 insertions(+), 3 deletions(-)
>
> Leaving patch unsnipped for reviewers' sake.
Looks good to me.
-- 
Alexandre Julliard
julliard@winehq.org
Jonathan Nieder· Apr 3, 2011, 19:25 UTC · re: Alexandre Julliard · lore

Re: [PATCH] git.el: Don't use font-lock-compile-keywords

Alexandre Julliard wrote:
> Jonathan Nieder <jrnieder@gmail.com> writes:
Show 13 quoted lines
>>> So here it is
>>> again.  The originally proposed patch from Debian is to use
>>> font-lock-add-keywords rather than font-lock-compile-keywords.
>>> However, it doesn't exist in XEmacs, if one is looking to
>>> maintain compatibility, I believe this patch is the right thing
>>> to do.
>>>
>>>  contrib/emacs/git.el |   13 ++++++++++---
>>>  1 files changed, 10 insertions(+), 3 deletions(-)
>>
>> Leaving patch unsnipped for reviewers' sake.
>
> Looks good to me.
Just cc-ing Junio so he can see your ack.

Junio, the patch up-thread fixes a bug reported by Kevin Ryde <user42@zip.com.au>. I'm not knowledgeable enough to see what the impact is, but the emacs experts seem to like it.

Kevin Ryde· Apr 4, 2011, 23:15 UTC · re: Jonathan Nieder · lore

Re: [PATCH] git.el: Don't use font-lock-compile-keywords

Jonathan Nieder <jrnieder@gmail.com> writes:
>
> Lawrence Mitchell wrote:
>> font-lock-add-keywords rather than font-lock-compile-keywords.
>> However, it doesn't exist in XEmacs,

Oh, I didn't realize that. In my own code I think I've only ever set font-lock-defaults and left it at that ...

-- 
Newton's first law elucidated for the layman:
A body in motion continues in motion, unless it doesn't.

← back to recent threads