mirrors
/
ambevar-dotfiles
mirror of https://gitlab.com/ambrevar/dotfiles/
1
0
Fork 0
Code Issues Releases Wiki Activity

EXWM: Really fix s-l binding with desktop-environment

master
Pierre Neidhardt 2019-02-27 16:49:22 +01:00
parent b781b603c6
commit 56e8caca16
1 changed files with 9 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
.emacs.d/lisp/init-exwm.el
View File

@ -161,10 +161,16 @@
(when (require 'desktop-environment nil 'noerror)
(setq desktop-environment-screenshot-directory "~/temp")
;; Use s-l to navigate windows.
(define-key desktop-environment-mode-map (kbd "s-z") #'desktop-environment-lock-screen)
(desktop-environment-mode)
(exwm-input-set-key (kbd "s-l") #'windmove-right))
;; Use s-l to navigate windows.
;; REVIEW: This is a workaround because of
;; https://gitlab.petton.fr/DamienCassou/desktop-environment/issues/3
(setq desktop-environment--keybindings
(delete
`(,(kbd "s-l") . ,(function desktop-environment-lock-screen))
desktop-environment--keybindings))
(define-key desktop-environment-mode-map (kbd "s-l") nil)
(desktop-environment-mode))
;;; Volume control
(when (require 'pulseaudio-control nil t)