emacs-devel
[Top][All Lists]
Advanced

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

Re: address@hidden: modification hooks called only once in c-mode]


From: Stefan Monnier
Subject: Re: address@hidden: modification hooks called only once in c-mode]
Date: Thu, 16 Aug 2007 16:46:21 -0400
User-agent: Gnus/5.11 (Gnus v5.11) Emacs/22.1.50 (gnu/linux)

>> A side benefit of the change is that now
>> (after|before)-change-function keep their values while they run, so
>> we can change (after|before)-change-functions from an
>> (after|before)-change-function (syntax.el enjoys doing that).

> Might need an Elisp manual update.

Indeed, thanks.  I've installed the patch below,


        Stefan


Index: lispref/text.texi
===================================================================
RCS file: /sources/emacs/emacs/lispref/text.texi,v
retrieving revision 1.145
diff -u -r1.145 text.texi
--- lispref/text.texi   27 Jun 2007 00:36:54 -0000      1.145
+++ lispref/text.texi   16 Aug 2007 20:45:39 -0000
@@ -4278,35 +4278,6 @@
 functions.
 @end defmac
 
-The two variables above are temporarily bound to @code{nil} during the
-time that any of these functions is running.  This means that if one of
-these functions changes the buffer, that change won't run these
-functions.  If you do want a hook function to make changes that run
-these functions, make it bind these variables back to their usual
-values.
-
-One inconvenient result of this protective feature is that you cannot
-have a function in @code{after-change-functions} or
address@hidden which changes the value of that variable.
-But that's not a real limitation.  If you want those functions to change
-the list of functions to run, simply add one fixed function to the hook,
-and code that function to look in another variable for other functions
-to call.  Here is an example:
-
address@hidden
-(setq my-own-after-change-functions nil)
-(defun indirect-after-change-function (beg end len)
-  (let ((list my-own-after-change-functions))
-    (while list
-      (funcall (car list) beg end len)
-      (setq list (cdr list)))))
-
address@hidden
-(add-hooks 'after-change-functions
-           'indirect-after-change-function)
address@hidden group
address@hidden example
-
 @defvar first-change-hook
 This variable is a normal hook that is run whenever a buffer is changed
 that was previously in the unmodified state.
@@ -4318,6 +4289,13 @@
 described above in this section, as well as the hooks attached to
 certain special text properties (@pxref{Special Properties}) and overlay
 properties (@pxref{Overlay Properties}).
+
+Also, this variable is bound to address@hidden while running those
+same hook variables, so that by default modifying the buffer from
+a modification hook does not cause other modification hooks to be run.
+If you do want modification hooks to be run in a particular piece of
+code that is itself run from a modification hook, then rebind locally
address@hidden to @code{nil}.
 @end defvar
 
 @ignore




reply via email to

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