# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 823159334 0
# Node ID 1ce19c0594b19ae7f3fed14a4179fbb3dd4a2104
# Parent  e5414c27441462ab400d28a2c0a9e2b34c2dcb48
(compilation-filter): Run compilation-filter-hook.

diff -r e5414c274414 -r 1ce19c0594b1 lisp/progmodes/compile.el
--- a/lisp/progmodes/compile.el	Thu Feb 01 06:04:44 1996 +0000
+++ b/lisp/progmodes/compile.el	Thu Feb 01 07:22:14 1996 +0000
@@ -645,6 +645,7 @@
 	  (save-excursion
 	    (goto-char (process-mark proc))
 	    (insert-before-markers string)
+	    (run-hooks 'compilation-filter-hook)
 	    (set-marker (process-mark proc) (point)))))))
 
 ;; Return the cdr of compilation-old-error-list for the error containing point.