소스 검색

Fix edit-server-kill-client.

The list edit-server-clients holds processes, not buffers.
Wei Hu 14 년 전
부모
커밋
912e471893
1개의 변경된 파일1개의 추가작업 그리고 1개의 파일을 삭제
  1. 1 1
      edit-server.el

+ 1 - 1
edit-server.el

@@ -344,7 +344,7 @@ and its buffer are killed with `edit-server-kill-client'."
   (let ((procbuf (process-buffer proc)))
     (delete-process proc)
     (kill-buffer procbuf)
-    (setq edit-server-clients (delq procbuf edit-server-clients))))
+    (setq edit-server-clients (delq proc edit-server-clients))))
 
 (defun edit-server-done (&optional abort nokill)
   "Finish editing: send HTTP response back, close client and editing buffers.