exwm detection config

This commit is contained in:
Sakooooo 2024-08-03 23:51:59 +04:00
parent dc62f67454
commit 8d60f5924d
Signed by: sako
GPG key ID: 3FD715D87D7725E0
2 changed files with 7 additions and 1 deletions

View file

@ -1243,7 +1243,12 @@ Export and then view with emacs :)
* EXWM * EXWM
I'm scared I'm scared
#+begin_src emacs-lisp #+begin_src emacs-lisp
(defvar is-exwm nil
"Toggle if EXWM is being used")
(when (eq system-type 'gnu/linux) (when (eq system-type 'gnu/linux)
(if (is-exwm)
(use-package exwm (use-package exwm
:config :config
(set-frame-parameter nil 'alpha '(90 . 90)) (set-frame-parameter nil 'alpha '(90 . 90))
@ -1392,7 +1397,7 @@ I'm scared
(desktop-environment-brightness-small-decrement "2%-") (desktop-environment-brightness-small-decrement "2%-")
(desktop-environment-brightness-normal-increment "5%+") (desktop-environment-brightness-normal-increment "5%+")
(desktop-environment-brightness-normal-decrement "5%-")) (desktop-environment-brightness-normal-decrement "5%-"))
) ))
#+end_src #+end_src
* End * End
#+begin_src elisp #+begin_src elisp

View file

@ -48,6 +48,7 @@ in {
# }))) # })))
# ''; # '';
extraConfig = pkgs.writeText "emacs-loadscript" '' extraConfig = pkgs.writeText "emacs-loadscript" ''
(setq is-exwm t)
(exwm-init) (exwm-init)
''; '';
in in