Mercurial > emacs

comparison lisp/server.el @ 702:c89caa39704a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
author Richard M. Stallman <rms@gnu.org>
date Tue, 09 Jun 1992 18:16:08 +0000
parents 7cbd4fcd8b0f
children 3cece0106722
comparison
equal deleted inserted replaced
701:e7eb08ed73c0 702:c89caa39704a
93 "*Regexp which should match filenames of temporary files 93 "*Regexp which should match filenames of temporary files
94 which are deleted and reused after each edit 94 which are deleted and reused after each edit
95 by the programs that invoke the emacs server.") 95 by the programs that invoke the emacs server.")
96 96
97 (make-variable-buffer-local 'server-buffer-clients) 97 (make-variable-buffer-local 'server-buffer-clients)
98 (put 'server-buffer-clients 'permanent-local t)
98 (setq-default server-buffer-clients nil) 99 (setq-default server-buffer-clients nil)
99 (or (assq 'server-buffer-clients minor-mode-alist) 100 (or (assq 'server-buffer-clients minor-mode-alist)
100 (setq minor-mode-alist (cons '(server-buffer-clients " Server") minor-mode-alist))) 101 (setq minor-mode-alist (cons '(server-buffer-clients " Server") minor-mode-alist)))
101 102
102 ;; If a *server* buffer exists, 103 ;; If a *server* buffer exists,