[Emacs-diffs] Changes to emacs/lisp/progmodes/compile.el, v [EMACS_22_BASE]

[Richard M. Stallman]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Branch:         EMACS_22_BASE
Changes by:     Richard M. Stallman <rms>       07/05/10 16:10:27

Index: compile.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/progmodes/compile.el,v
retrieving revision 1.421
retrieving revision 1.421.2.1
diff -u -b -r1.421 -r1.421.2.1
--- compile.el  13 Apr 2007 15:09:37 -0000      1.421
+++ compile.el  10 May 2007 16:10:27 -0000      1.421.2.1
@@ -1448,10 +1448,7 @@
     (with-no-warnings
       (if compilation-finish-function
          (funcall compilation-finish-function (current-buffer) msg)))
-    (let ((functions compilation-finish-functions))
-      (while functions
-       (funcall (car functions) (current-buffer) msg)
-       (setq functions (cdr functions))))))
+    (run-hook-with-args compilation-finish-functions (current-buffer) msg)))
 
 ;; Called when compilation process changes state.
 (defun compilation-sentinel (proc msg)