summaryrefslogtreecommitdiff
path: root/.exwm.el
diff options
context:
space:
mode:
Diffstat (limited to '.exwm.el')
-rw-r--r--.exwm.el42
1 files changed, 21 insertions, 21 deletions
diff --git a/.exwm.el b/.exwm.el
index 00d4514..8029f1e 100644
--- a/.exwm.el
+++ b/.exwm.el
@@ -6,7 +6,7 @@
(setq display-time-day-and-date t)
(display-time-mode 1)
-
+
(exwm-firefox-holyK-mode 1)
;;Launch apps that will run in the background
@@ -35,8 +35,8 @@
(require 'exwm-randr)
(setq exwm-randr-workspace-monitor-plist '(0 "DP-1" 2 "HDMI-A-0"))
(add-hook 'exwm-randr-screen-change-hook
- (lambda ()
- (start-process-shell-command
+ (lambda ()
+ (start-process-shell-command
"xrandr" nil "xrandr --output DisplayPort-2 --primary --mode 2560x1440 --pos 1920x0 --rotate normal --output HDMI-A-0 --mode 1920x1080 --pos 0x0 --rotate normal" )))
(exwm-randr-enable)
@@ -78,29 +78,29 @@
(setq exwm-input-global-keys
`(
- ([?\s-r] . exwm-reset)
+ ([?\s-r] . exwm-reset)
- ;; ;; Launch applications via shell command
- ;; ([?\s-&] . (lambda (command)
- ;; (interactive (list (read-shell-command "$ ")))
- ;; (start-process-shell-command command nil command)))
+ ;; ;; Launch applications via shell command
+ ;; ([?\s-&] . (lambda (command)
+ ;; (interactive (list (read-shell-command "$ ")))
+ ;; (start-process-shell-command command nil command)))
- ;; Switch workspace
- ([?\s-e] . exwm-workspace-switch)
- ([?\s-`] . (lambda () (interactive) (exwm-workspace-switch-create 0)))
- ([?\s-2] . (lambda () (interactive) (exwm-workspace-switch-create 1)))
- ([?\s-3] . (lambda () (interactive) (exwm-workspace-switch-create 2)))
- ([?\s-4] . (lambda () (interactive) (exwm-workspace-switch-create 3)))
- ([?\s-5] . (lambda () (interactive) (exwm-workspace-switch-create 4)))
+ ;; Switch workspace
+ ([?\s-e] . exwm-workspace-switch)
+ ([?\s-`] . (lambda () (interactive) (exwm-workspace-switch-create 0)))
+ ([?\s-2] . (lambda () (interactive) (exwm-workspace-switch-create 1)))
+ ([?\s-3] . (lambda () (interactive) (exwm-workspace-switch-create 2)))
+ ([?\s-4] . (lambda () (interactive) (exwm-workspace-switch-create 3)))
+ ([?\s-5] . (lambda () (interactive) (exwm-workspace-switch-create 4)))
- ,@(mapcar (lambda (i)
- `(,(kbd (format "s-%d" i)) .
- (lambda ()
- (interactive)
- (exwm-workspace-switch-create ,i))))
- (number-sequence 0 9))))
+ ,@(mapcar (lambda (i)
+ `(,(kbd (format "s-%d" i)) .
+ (lambda ()
+ (interactive)
+ (exwm-workspace-switch-create ,i))))
+ (number-sequence 0 9))))
(defun exwm-enlarge-horizontally-50 ()
(interactive)