diff options
author | Stefan Monnier <[email protected]> | 2007-12-10 03:51:25 +0000 |
---|---|---|
committer | Stefan Monnier <[email protected]> | 2007-12-10 03:51:25 +0000 |
commit | ff91dc79efda4e4f20cefd4bc11cb711ec5f0fde (patch) | |
tree | 87d4713750099d618b26066d442949790a7c21cb /lisp/server.el | |
parent | 6d0867e5f54987f3133afce53d35a65adbae99b7 (diff) |
(server-select-display): Fix important typo.
(server-process-filter): Turn a "" display into nil.
Diffstat (limited to 'lisp/server.el')
-rw-r--r-- | lisp/server.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/server.el b/lisp/server.el index e6477b92d6..4d21959774 100644 --- a/lisp/server.el +++ b/lisp/server.el @@ -242,8 +242,7 @@ ENV should be in the same format as `process-environment'." "Delete PROC, including its buffers, terminals and frames. If NOFRAME is non-nil, let the frames live. (To be used from `delete-frame-functions'.)" - (server-log (concat "server-delete-client" (if noframe " noframe")) - proc) + (server-log (concat "server-delete-client" (if noframe " noframe")) proc) ;; Force a new lookup of client (prevents infinite recursion). (when (memq proc server-clients) (let ((buffers (process-get proc 'buffers))) @@ -339,7 +338,7 @@ If CLIENT is non-nil, add a description of it to the logged message." display ;; Make it display (and remember) some dummy buffer, so ;; we can detect later if the frame is in use or not. - `((server-dummmy-buffer . ,buffer) + `((server-dummy-buffer . ,buffer) ;; This frame may be deleted later (see ;; server-unselect-display) so we want it to be as ;; unobtrusive as possible. @@ -833,7 +832,8 @@ The following commands are accepted by the client: ;; -display DISPLAY: ;; Open X frames on the given display instead of the default. ((and (equal "-display" arg) command-line-args-left) - (setq display (pop command-line-args-left))) + (setq display (pop command-line-args-left)) + (if (zerop (length display)) (setq display nil))) ;; -window-system: Open a new X frame. ((equal "-window-system" arg) |