blob: 3cf8be1bbe68c2121c86db8dabce2be544d857eb (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
(define-module (xmodmap)
#:use-module (gnu home services)
#:use-module (gnu home services desktop))
;; Below is a list of Home services. To search for available
;; services, run 'guix home search KEYWORD' in a terminal.
(define-public xmodmap-service
(list
(service home-xmodmap-service-type
(home-xmodmap-configuration
(key-map '(("remove Lock" . "Caps_Lock")
("remove Control" . "Control_L")
("keysym Control_L" ."Caps_Lock")
("keysym Caps_Lock" . "Control_L")
("add Lock" . "Caps_Lock")
("add Control" . "Control_L")))))))
|
