emacs-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: post-command-hook


From: Stefan Monnier
Subject: Re: post-command-hook
Date: Sat, 02 Apr 2011 17:40:17 -0400
User-agent: Gnus/5.13 (Gnus v5.13) Emacs/24.0.50 (gnu/linux)

> (defun foo ()
>   (message "foo"))
> (defun bar ()
>   (message "bar"))
> (add-hook 'post-command-hook 'foo)
> (add-hook 'post-command-hook 'bar nil t)

I think the patch below fixes it,


        Stefan


=== modified file 'src/keyboard.c'
--- src/keyboard.c      2011-04-02 18:34:05 +0000
+++ src/keyboard.c      2011-04-02 21:37:19 +0000
@@ -1815,7 +1815,8 @@
 safe_run_hooks_1 (void)
 {
   eassert (CONSP (Vinhibit_quit));
-  return call0 (XCDR (Vinhibit_quit));
+  call0 (XCDR (Vinhibit_quit));
+  return Qnil;
 }
 
 /* Subroutine for safe_run_hooks: handle an error by clearing out the function




reply via email to

[Prev in Thread] Current Thread [Next in Thread]