*** empty log message ***
[bpt/emacs.git] / lisp / server.el
index 73f6479..9273064 100644 (file)
@@ -1,4 +1,5 @@
-;; Lisp code for GNU Emacs running as server process.
+;;; server.el --- Lisp code for GNU Emacs running as server process.
+
 ;; Copyright (C) 1986, 1987 Free Software Foundation, Inc.
 ;; Author William Sommerfeld, wesommer@athena.mit.edu.
 ;; Changes by peck@sun.com and by rms.
@@ -94,6 +95,7 @@ which are deleted and reused after each edit
 by the programs that invoke the emacs server.")
 
 (make-variable-buffer-local 'server-buffer-clients)
+(put 'server-buffer-clients 'permanent-local t)
 (setq-default server-buffer-clients nil)
 (or (assq 'server-buffer-clients minor-mode-alist)
     (setq minor-mode-alist (cons '(server-buffer-clients " Server") minor-mode-alist)))
@@ -296,3 +298,5 @@ Arg NEXT-BUFFER is a suggestion; if it is a live buffer, use it."
       (switch-to-buffer (other-buffer)))))
 
 (global-set-key "\C-x#" 'server-edit)
+
+;;; server.el ends here