Mercurial > emacs
diff lisp/server.el @ 83105:efc02a84dfbb
Fix frame parameter handling in server.el.
lisp/server.el (server-process-filter): Work around make-frame
frame parameter bogosity by using modify-frame-parameters.
git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-145
| author | Karoly Lorentey <lorentey@elte.hu> |
|---|---|
| date | Sun, 18 Apr 2004 02:24:18 +0000 |
| parents | efc0b56b83d9 |
| children | c7a76f7d323c |
line wrap: on
line diff
--- a/lisp/server.el Sun Apr 18 01:40:02 2004 +0000 +++ b/lisp/server.el Sun Apr 18 02:24:18 2004 +0000 @@ -468,8 +468,8 @@ (or display (frame-parameter nil 'display) (getenv "DISPLAY") - (error "Please specify display")) - (list (cons 'client proc)))) + (error "Please specify display")))) + (modify-frame-parameters frame (list (cons 'client proc))) (select-frame frame) (server-client-set client 'frame frame) (setq dontkill t)) @@ -501,7 +501,8 @@ (setq request (substring request (match-end 0))) (unless (server-client-get client 'version) (error "Protocol error; make sure you use the correct version of emacsclient")) - (setq frame (make-frame-on-tty tty type (list (cons 'client proc)))) + (setq frame (make-frame-on-tty tty type)) + (modify-frame-parameters frame (list (cons 'client proc))) (select-frame frame) (server-client-set client 'frame frame) (server-client-set client 'tty (frame-tty-name frame))