diff --git a/.doom.d/config.el b/.doom.d/config.el index be9d646..5e2f1ee 100644 --- a/.doom.d/config.el +++ b/.doom.d/config.el @@ -210,11 +210,19 @@ ([?\s-&] . (lambda () (interactive) (exwm-workspace-move-window 7))) ([?\s-*] . (lambda () (interactive) (exwm-workspace-move-window 8))) ([?\s-\(] . (lambda () (interactive) (exwm-workspace-move-window 9))) + ;; SUPER+/ switches to char-mode (needed to pass commands in XWindows sometimes) + ;; SUPER+? switches us back to line-mode + ([?\s-/] . exwm-input-release-keyboard) + ([?\s-?] . exwm-reset) ;; setting some toggle commands ([?\s-f] . exwm-floating-toggle-floating) ([?\s-m] . exwm-layout-toggle-mode-line) ([f11] . exwm-layout-toggle-fullscreen))) +(defun dt/exwm-start-lxsession () + (interactive) + (start-process-shell-command "lxsession" nil "lxsession")) + (defun dt/exwm-start-picom () (interactive) (start-process-shell-command "picom" nil "picom")) @@ -223,14 +231,15 @@ (interactive) (start-process-shell-command "nm-applet" nil "nm-applet")) -(defun dt/exwm-start-volume-icon () +(defun dt/exwm-start-volumeicon () (interactive) - (start-process-shell-command "volume-icon" nil "volume-icon")) + (start-process-shell-command "volumeicon" nil "volumeicon")) -(after! exwm-config +(after! exwm + (dt/exwm-start-lxsession) (dt/exwm-start-picom) (dt/exwm-start-nm-applet) - (dt/exwm-start-volume-icon)) + (dt/exwm-start-volumeicon)) (setq doom-font (font-spec :family "SauceCodePro Nerd Font Mono" :size 15) doom-variable-pitch-font (font-spec :family "Ubuntu" :size 15) diff --git a/.doom.d/config.org b/.doom.d/config.org index 43900ac..e0a433b 100644 --- a/.doom.d/config.org +++ b/.doom.d/config.org @@ -352,6 +352,10 @@ Emacs can be your window manager. You need to install the exwm package (make su ([?\s-&] . (lambda () (interactive) (exwm-workspace-move-window 7))) ([?\s-*] . (lambda () (interactive) (exwm-workspace-move-window 8))) ([?\s-\(] . (lambda () (interactive) (exwm-workspace-move-window 9))) + ;; SUPER+/ switches to char-mode (needed to pass commands in XWindows sometimes) + ;; SUPER+? switches us back to line-mode + ([?\s-/] . exwm-input-release-keyboard) + ([?\s-?] . exwm-reset) ;; setting some toggle commands ([?\s-f] . exwm-floating-toggle-floating) ([?\s-m] . exwm-layout-toggle-mode-line) @@ -361,6 +365,10 @@ Emacs can be your window manager. You need to install the exwm package (make su Below, I define a few functions that are really just some programs that I want to autostart when logging in to EXWM. Note that I don't execute these until after EXWM has started. #+begin_src emacs-lisp +(defun dt/exwm-start-lxsession () + (interactive) + (start-process-shell-command "lxsession" nil "lxsession")) + (defun dt/exwm-start-picom () (interactive) (start-process-shell-command "picom" nil "picom")) @@ -369,14 +377,15 @@ Below, I define a few functions that are really just some programs that I want t (interactive) (start-process-shell-command "nm-applet" nil "nm-applet")) -(defun dt/exwm-start-volume-icon () +(defun dt/exwm-start-volumeicon () (interactive) - (start-process-shell-command "volume-icon" nil "volume-icon")) + (start-process-shell-command "volumeicon" nil "volumeicon")) -(after! exwm-config +(after! exwm + (dt/exwm-start-lxsession) (dt/exwm-start-picom) (dt/exwm-start-nm-applet) - (dt/exwm-start-volume-icon)) + (dt/exwm-start-volumeicon)) #+end_src * FONTS