Commit 1d515b42 authored by Andreas Schwab's avatar Andreas Schwab
Browse files

(server-start): Only register cleanup after server was

started.
parent 726f0272
2007-11-07 Andreas Schwab <schwab@suse.de>
* server.el (server-start): Only register cleanup after server was
started.
2007-11-06 Michael Albinus <michael.albinus@gmx.de>
* net/tramp.el (top): Don't autoload `tramp-cache-print'.
......
......@@ -483,6 +483,7 @@ kill any existing server communications subprocess."
(add-hook 'delete-frame-functions 'server-handle-delete-frame)
(add-hook 'kill-buffer-query-functions 'server-kill-buffer-query-function)
(add-hook 'kill-emacs-query-functions 'server-kill-emacs-query-function)
(add-hook 'kill-emacs-hook (lambda () (server-mode -1))) ;Cleanup upon exit.
(setq server-process
(apply #'make-network-process
:name server-name
......@@ -1293,7 +1294,6 @@ only these files will be asked to be saved."
;; continue standard unloading
nil)
(add-hook 'kill-emacs-hook (lambda () (server-mode -1))) ;Cleanup upon exit.
(defvar server-unload-function 'server-unload-function)
(provide 'server)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment