(compilation-filter): Fix up last change.

2 files changed, 3 insertions, 0 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 390f9025daa..826675914dd 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2008-06-11  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+        * progmodes/compile.el (compilation-filter): Fix up last change.
+
         * term/linux.el (terminal-init-linux): Use gpm-mouse-enable.
 
         * t-mouse.el (gpm-mouse-enable, gpm-mouse-disable): New functions.
diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index 0c8bb8473be..07e5600d373 100644
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -1675,6 +1675,7 @@ Just inserts the text, and runs `compilation-filter-hook'."
             ;; point at `process-mark' scroll along with the output, but we
             ;; now use window-point-insertion-type instead.
             (insert string)
+            (set-marker (process-mark proc) (point))
             (run-hooks 'compilation-filter-hook))))))
 
 ;;; test if a buffer is a compilation buffer, assuming we're in the buffer