mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-02-01 20:06:00 +00:00
Code Issues Releases Activity

(eudc-ph-open-session): Use set-process-query-on-exit-flag.

Browse Source
This commit is contained in:
Richard M. Stallman 2005-11-16 22:23:28 +00:00
parent 63fcfa450f
commit 4e46799eac
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/net/eudcb-ph.el
View File

@ -184,7 +184,7 @@ SERVER is either a string naming the server or a list (NAME PORT)."
(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)