diff options
Diffstat (limited to 'oni/home/services/xdisorg.scm')
| -rw-r--r-- | oni/home/services/xdisorg.scm | 12 |
1 files changed, 11 insertions, 1 deletions
diff --git a/oni/home/services/xdisorg.scm b/oni/home/services/xdisorg.scm index 26ed246..1f3bdf7 100644 --- a/oni/home/services/xdisorg.scm +++ b/oni/home/services/xdisorg.scm @@ -9,6 +9,7 @@ #:use-module (guix i18n) #:use-module (guix modules) #:use-module (guix diagnostics) + #:use-module (oni home services xbindkeys) #:use-module (srfi srfi-1) #:use-module (srfi srfi-26) #:use-module (ice-9 match) @@ -138,6 +139,12 @@ (append-map home-rofi-configuration-theme extension-configs))))))) +(define (add-rofi-xbindkeys-keybindings config) + (home-xbindkeys-extension + (keybindings + '(((mod4 r) . "herbstclient spawn rofi -show run") + ((mod4 w) . "herbstclient spawn rofi -show window -window-command \"/home/chelys/usr/bin/hlwm-switch-to-window {window}\""))))) + (define home-rofi-service-type (service-type (name 'home-rofi) (extensions @@ -146,7 +153,10 @@ home-rofi-files-service) (service-extension home-profile-service-type - home-rofi-profile-service))) + home-rofi-profile-service) + (service-extension + home-xbindkeys-service-type + add-rofi-xbindkeys-keybindings))) (compose concatenate) (extend home-rofi-extension) (default-value (home-rofi-configuration)) |