Remove X11 dark theme selection command
This commit is contained in:
parent
1a733c9338
commit
e4c3a794c2
14
init.el
14
init.el
@ -621,14 +621,12 @@ have been closed."
|
|||||||
|
|
||||||
(defun user/set-up-frame (frame)
|
(defun user/set-up-frame (frame)
|
||||||
"Set up newly-created frame FRAME."
|
"Set up newly-created frame FRAME."
|
||||||
(when (display-graphic-p frame)
|
(when (and (daemonp)
|
||||||
(let ((winid (frame-parameter frame 'outer-window-id)))
|
(display-graphic-p frame)
|
||||||
(start-process "" nil "xprop" "-f" "_GTK_THEME_VARIANT" "8u" "-set" "_GTK_THEME_VARIANT" "dark" "-id" winid))
|
(not user/initial-frame-created))
|
||||||
(when (and (daemonp)
|
(with-selected-frame frame
|
||||||
(not user/initial-frame-created))
|
(run-hooks 'user/after-daemon-make-initial-frame-functions)
|
||||||
(with-selected-frame frame
|
(setq user/initial-frame-created t))))
|
||||||
(run-hooks 'user/after-daemon-make-initial-frame-functions)
|
|
||||||
(setq user/initial-frame-created t)))))
|
|
||||||
|
|
||||||
(editor-feature frame
|
(editor-feature frame
|
||||||
"Graphical frame configuration."
|
"Graphical frame configuration."
|
||||||
|
Loading…
Reference in New Issue
Block a user