changeset 79256:02a9c3ab0adf

(server-unload-function): Unbind `server-edit' from `C-x #'. (server-unload-function): Remove variable.
author Juanma Barranquero <lekktu@gmail.com>
date Tue, 30 Oct 2007 00:20:02 +0000
parents 3e37b479924d
children 60995c957b44
files lisp/server.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/server.el	Tue Oct 30 00:15:06 2007 +0000
+++ b/lisp/server.el	Tue Oct 30 00:20:02 2007 +0000
@@ -767,6 +767,7 @@
 (defun server-unload-function ()
   "Unload the server library."
   (server-mode -1)
+  (substitute-key-definition 'server-edit nil ctl-x-map)
   (save-current-buffer
    (dolist (buffer (buffer-list))
      (set-buffer buffer)
@@ -775,7 +776,6 @@
   nil)
 
 (add-hook 'kill-emacs-hook (lambda () (server-mode -1))) ;Cleanup upon exit.
-(defvar server-unload-function 'server-unload-function)
 
 (provide 'server)