EXWM key bindings

init.el

@@ -61,7 +61,7 @@
 (setq browse-url-browser-function 'eww-browse-url)
 ;; autostart all-the-icons
 (require 'all-the-icons)
-(all-the-icons-icon-for-mode 1)
+(all-the-icons-icon-for-mode t)
 
 					; LISP
 (load (expand-file-name "~/.roswell/helper.el"))
@@ -73,9 +73,19 @@
 					; exwm
 (require 'exwm)
 (require 'exwm-config)
-(exwm-config-default)
+(exwm-enable)
 (require 'exwm-systemtray)
 (exwm-systemtray-enable)
+;; key bindings
+(setq exwm-input-global-keys
+      `(([?\s-r] . exwm-reset)
+        ([?\s-w] . exwm-workspace-switch)
+        ,@(mapcar (lambda (i)
+                    `(,(kbd (format "s-%d" i)) .
+                      (lambda ()
+                        (interactive)
+                        (exwm-workspace-switch-create ,i))))
+                  (number-sequence 0 9))))
 
 					; elfeed
 (use-package elfeed