From: Daiki Ueno Date: Wed, 8 Oct 2003 19:20:29 +0000 (+0000) Subject: * riece-server.el (riece-quit-server-process): Call X-Git-Url: http://cgit.sxemacs.org/?p=riece;a=commitdiff_plain;h=53e1d0d718ed682c592503493c68f1f5062f1cae;ds=inline * riece-server.el (riece-quit-server-process): Call riece-close-server-process instead of kill-process. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 7fabcd4..43daee8 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2003-10-08 Daiki Ueno + + * riece-server.el (riece-quit-server-process): Call + riece-close-server-process instead of kill-process. + 2003-10-07 Daiki Ueno * riece-display.el (riece-channel-buffer-name): Check whether diff --git a/lisp/riece-server.el b/lisp/riece-server.el index 0182813..89e9237 100644 --- a/lisp/riece-server.el +++ b/lisp/riece-server.el @@ -211,7 +211,7 @@ the `riece-server-keyword-map' variable." (run-at-time riece-quit-timeout nil (lambda (process) (if (memq process riece-process-list) - (kill-process (process-buffer process)))) + (riece-close-server-process process))) process) (riece-process-send-string process (if message