(follow-stop-intercept-process-output):

Use `follow-call-process-filter' rather than `process-filter'.

2 files changed, 8 insertions, 3 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 37f99104f8e..21ae5b78d62 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2007-10-11  Juanma Barranquero  <lekktu@gmail.com>
+
+        * follow.el (follow-stop-intercept-process-output):
+        Use `follow-call-process-filter' rather than `process-filter'.
+
 2007-10-11  Tom Tromey  <tromey@redhat.com>
 
         * progmodes/gdb-ui.el (gdb-info-stack-custom): Ensure current
@@ -17,8 +22,8 @@
         * ps-print.el: Fix the usage of :foreground and :background face
         attributes.  Reported by Nikolaj Schumacher <n_schumacher@web.de>.
         (ps-print-version): New version 6.7.6.
-        (ps-face-attributes, ps-face-attribute-list, ps-face-background): Fix
-        code.
+        (ps-face-attributes, ps-face-attribute-list, ps-face-background):
+        Fix code.
         (ps-face-foreground-color-p, ps-face-background-color-p)
         (ps-face-color-p): New inline funs.
 
diff --git a/lisp/follow.el b/lisp/follow.el
index 91713aa6e42..6400c799794 100644
--- a/lisp/follow.el
+++ b/lisp/follow.el
@@ -1900,7 +1900,7 @@ report this using the `report-emacs-bug' function."
   (follow-tidy-process-filter-alist)
   (let ((list (process-list)))
     (while list
-      (if (eq (process-filter (car list)) 'follow-generic-filter)
+      (if (eq (follow-call-process-filter (car list)) 'follow-generic-filter)
           (progn
             (follow-call-set-process-filter
              (car list)