X-Git-Url: https://cgit.sxemacs.org/?p=riece;a=blobdiff_plain;f=lisp%2Friece-server.el;h=89e923750a8a3ddfd07d399527e3e7719e0b7573;hp=0182813161361bada1f60fbd2b8593d3e89e68c4;hb=53e1d0d718ed682c592503493c68f1f5062f1cae;hpb=ff78a9957d5a741e62e36d9b29e536c3b6047347

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