# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1097996107 0
# Node ID e47852bd4fc4f8694aae5c7d892bd8da85773542
# Parent  06006ae6008a5d458a6fa76c351cfbe9c9f0f6e1
(server-unload-hook): Set as a variable with add-hook.

diff -r 06006ae6008a -r e47852bd4fc4 lisp/server.el
--- a/lisp/server.el	Sun Oct 17 06:54:13 2004 +0000
+++ b/lisp/server.el	Sun Oct 17 06:55:07 2004 +0000
@@ -631,6 +631,8 @@
   (remove-hook 'kill-buffer-query-functions 'server-kill-buffer-query-function)
   (remove-hook 'kill-emacs-query-functions 'server-kill-emacs-query-function)
   (remove-hook 'kill-buffer-hook 'server-kill-buffer))
+
+(add-hook 'server-unload-hook 'server-unload-hook)
 
 (provide 'server)