]> git.eshelyaron.com Git - emacs.git/commitdiff
[PATCH 1/1] Pass frame-parameters to server-create-tty-frame
authorMichael Shields <shields@msrl.com>
Tue, 25 Jun 2019 11:57:58 +0000 (13:57 +0200)
committerLars Ingebrigtsen <larsi@gnus.org>
Tue, 25 Jun 2019 12:53:51 +0000 (14:53 +0200)
* lisp/server.el: Pass frame-parameters when creating frames, even
on a tty (bug#24147).

lisp/server.el

index 436a44a7e947f7b64f97ac8b8a7d86e42c8f52a1..3435702a651f3ca5c211ced3a9b359aa5fc13dd6 100644 (file)
@@ -833,7 +833,7 @@ This handles splitting the command if it would be bigger than
       (setq prefix "-print-nonl "))
     (server-send-string proc (concat prefix qtext "\n"))))
 
-(defun server-create-tty-frame (tty type proc)
+(defun server-create-tty-frame (tty type proc &optional parameters)
   (unless tty
     (error "Invalid terminal device"))
   (unless type
@@ -866,7 +866,8 @@ This handles splitting the command if it would be bigger than
                          ;; envvars, and then to change the
                          ;; C functions `child_setup' and
                          ;; `getenv_internal' accordingly.
-                         (environment . ,(process-get proc 'env)))))))
+                         (environment . ,(process-get proc 'env))
+                         ,@parameters)))))
 
     ;; ttys don't use the `display' parameter, but callproc.c does to set
     ;; the DISPLAY environment on subprocesses.