Re: call1(Vrun_hooks, Qmy_hook) vs. Frun_hook(1, &Qmy_hook)

[Juanma Barranquero]

On Tue, 20 Nov 2001 03:56:59 -0700 (MST), Richard Stallman <address@hidden> 
wrote:

> The comment is correct.  So these places can be changed.

Ok. There are three of them.


                                                           /L/e/k/t/u


2001-11-20  Juanma Barranquero  <address@hidden>

        * abbrev.c (Fexpand_abbrev): Use Frun_hooks instead of
          deprecated style of running hook through call1.

        * buffer.c (Fkill_buffer): Likewise.

        * print.c (temp_output_buffer_setup): Likewise.


Index: abbrev.c
===================================================================
RCS file: /cvsroot/emacs/emacs/src/abbrev.c,v
retrieving revision 1.46
diff -u -r1.46 abbrev.c
--- abbrev.c    2001/11/02 20:15:12     1.46
+++ abbrev.c    2001/11/20 11:51:59
@@ -234,8 +234,7 @@
 
   value = Qnil;
 
-  if (!NILP (Vrun_hooks))
-    call1 (Vrun_hooks, Qpre_abbrev_expand_hook);
+  Frun_hooks (1, &Qpre_abbrev_expand_hook);
 
   wordstart = 0;
   if (!(BUFFERP (Vabbrev_start_location_buffer)
Index: buffer.c
===================================================================
RCS file: /cvsroot/emacs/emacs/src/buffer.c,v
retrieving revision 1.374
diff -u -r1.374 buffer.c
--- buffer.c    2001/11/14 00:06:50     1.374
+++ buffer.c    2001/11/20 11:52:00
@@ -1292,8 +1292,7 @@
       }
 
     /* Then run the hooks.  */
-    if (!NILP (Vrun_hooks))
-      call1 (Vrun_hooks, Qkill_buffer_hook);
+    Frun_hooks (1, &Qkill_buffer_hook);
     unbind_to (count, Qnil);
   }
 
Index: print.c
===================================================================
RCS file: /cvsroot/emacs/emacs/src/print.c,v
retrieving revision 1.168
diff -u -r1.168 print.c
--- print.c     2001/11/15 15:22:42     1.168
+++ print.c     2001/11/20 11:52:00
@@ -599,8 +599,7 @@
   Ferase_buffer ();
   XSETBUFFER (buf, current_buffer);
 
-  if (!NILP (Vrun_hooks))
-    call1 (Vrun_hooks, Qtemp_buffer_setup_hook);
+  Frun_hooks (1, &Qtemp_buffer_setup_hook);
 
   unbind_to (count, Qnil);