diff options
Diffstat (limited to '.emacs.d/lisp')
| -rw-r--r-- | .emacs.d/lisp/init-exwm.el | 18 |
1 files changed, 13 insertions, 5 deletions
diff --git a/.emacs.d/lisp/init-exwm.el b/.emacs.d/lisp/init-exwm.el index c5884cc..98ec823 100644 --- a/.emacs.d/lisp/init-exwm.el +++ b/.emacs.d/lisp/init-exwm.el @@ -36,11 +36,17 @@ (start-process-shell-command "nitrogen" nil "nitrogen --restore")) -(defun apollo/change-keys () +(defun apollo/emacs-keys () "Swap caps with ctrl." (interactive) (start-process-shell-command - "setxkbmap" nil "setxkbmap -option ctrl:swapcaps")) + "setxkbmap" nil "setxkbmap us -option ctrl:swapcaps")) + +(defun apollo/greek-keyboard () + "Swap caps with ctrl." + (interactive) + (start-process-shell-command + "setxkbmap" nil "setxkbmap gr")) (defun apollo/exwm-init-hook () "Do this upon start." @@ -52,8 +58,8 @@ ;;Launch apps that will run in the background ;; (apollo/run-in-background "blueman-applet") (apollo/run-in-background "picom") -;; (apollo/run-background "nm-applet") - (apollo/change-keys) +;; (apollo/run-in-background "nm-applet") + (apollo/emacs-keys) (apollo/set-wallpaper) ) @@ -139,11 +145,13 @@ (exwm-workspace-switch-create ,i)))) (number-sequence 0 9)))) - (exwm-input-set-key (kbd "s-d") 'dmenu) + (exwm-input-set-key (kbd "C-c d") 'dmenu) (exwm-input-set-key (kbd "s-<tab>") 'apollo/rofi-switch-window) (exwm-input-set-key (kbd "s-q") 'kill-emacs) (exwm-input-set-key (kbd "<XF86AudioRaiseVolume>") 'apollo/volume-increase) (exwm-input-set-key (kbd "<XF86AudioLowerVolume>") 'apollo/volume-decrease) + (exwm-input-set-key (kbd "s-0") 'apollo/emacs-keys) + (exwm-input-set-key (kbd "s-9") 'apollo/greek-keyboard) (exwm-enable)) ;;Transparency |