Browse Source

Fix edit-server-kill-client.

The list edit-server-clients holds processes, not buffers.
Wei Hu 14 years ago
parent
commit
912e471893
1 changed files with 1 additions and 1 deletions
  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.