* server.el (server-process-filter): Suppress `error', too.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ad2b0fa9dfcf288a7ae685003dec5c9f8aee4df4..79e900832952023fc90d9aeee49806f470e5ac31 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2004-12-31  Masatake YAMATO  <jet@gyve.org>
+
+       * server.el (server-process-filter): Suppress `error', too.
+
 2004-12-30  Jay Belanger  <belanger@truman.edu>
 
        * calc/calc-store.el (calc-copy-variable):  Fix mistyped variable

diff --git a/lisp/server.el b/lisp/server.el
index 534ba9fa09e96f2c59a05916c80cb3edf161076d..2c946b90275b68faac0e8f842cb647a92cf47feb 100644 (file)
--- a/lisp/server.el
+++ b/lisp/server.el
@@ -346,7 +346,8 @@ PROC is the server process.  Format of STRING is \"PATH PATH PATH... \\n\"."
                        ;; Suppress the error rose when the pipe to PROC is closed.
                        (condition-case err
                            (process-send-region proc (point-min) (point-max))
-                         (file-error nil))
+                         (file-error nil)
+                         (error nil))
                        ))))
              ;; ARG is a file name.
              ;; Collapse multiple slashes to single slashes.