mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-01 11:14:55 +00:00
Code Issues Releases Activity

(server-unload-function): Unbind server-edit' from C-x #'.

Browse Source 
(server-unload-function): Remove variable.
This commit is contained in:
Juanma Barranquero 2007-10-30 00:20:02 +00:00
parent fc8c78cccd
commit a8e0c05381
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/server.el
View File

@ -767,6 +767,7 @@ Arg NEXT-BUFFER is a suggestion; if it is a live buffer, use it."
(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 @@ Arg NEXT-BUFFER is a suggestion; if it is a live buffer, use it."
nil)
(add-hook 'kill-emacs-hook (lambda () (server-mode -1))) ;Cleanup upon exit.
(defvar server-unload-function 'server-unload-function)
(provide 'server)