changeset 66948:043fa9c73c77

(eudc-ph-open-session): Use set-process-query-on-exit-flag.
author Richard M. Stallman <rms@gnu.org>
date Wed, 16 Nov 2005 22:23:28 +0000
parents f455a937815f
children cd0310cf5638
files lisp/net/eudcb-ph.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/net/eudcb-ph.el	Wed Nov 16 22:22:18 2005 +0000
+++ b/lisp/net/eudcb-ph.el	Wed Nov 16 22:23:28 2005 +0000
@@ -184,7 +184,7 @@
       (setq process (open-network-stream "ph" eudc-ph-process-buffer host port))
       (if (null process)
 	  (throw 'done nil))
-      (process-kill-without-query process)
+      (set-process-query-on-exit-flag process t)
       process)))
 
 (defun eudc-ph-close-session (process)