diff src/process.c @ 233:52952cbfc5b5 r20-5b15

Import from CVS: tag r20-5b15
author cvs
date Mon, 13 Aug 2007 10:14:14 +0200
parents 2c611d1463a6
children 677f6a0ee643
line wrap: on
line diff
--- a/src/process.c	Mon Aug 13 10:13:49 2007 +0200
+++ b/src/process.c	Mon Aug 13 10:14:14 2007 +0200
@@ -1887,11 +1887,12 @@
 set_process_filter (Lisp_Object proc, Lisp_Object filter, int filter_does_read)
 {
   CHECK_PROCESS (proc);
-  if (PROCESS_LIVE_P (proc))
+  if (PROCESS_LIVE_P (proc)) {
     if (EQ (filter, Qt))
       event_stream_unselect_process (XPROCESS (proc));
     else
       event_stream_select_process (XPROCESS (proc));
+  }
 
   XPROCESS (proc)->filter = filter;
   XPROCESS (proc)->filter_does_read = filter_does_read;