FG42
/
FG42
1
0
Fork 1
Code Issues Pull Requests 1 Packages Projects Releases Wiki Activity

Replace hardcoded second screen name in wm core with a dynamic name

This commit is contained in:
Behnam Khanbeigi 2023-02-21 11:49:14 +01:00
parent c1764a2b6f
commit 5b166df915
1 changed files with 16 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

27
core/cubes/wm/core.el
View File

@ -25,22 +25,27 @@
(defun wm-randr ()
"RandR support for wm."
(def second-screen
(start-process-shell-command
"xrandr | awk '/\\ connected/ && /[[:digit:]]x[[:digit:]].*+/{print $1}' | tail -n") 1)
(when-wm
(require 'exwm-randr)
(setq exwm-randr-workspace-output-plist '(0 "HDMI-1"
1 "HDMI-1"
2 "HDMI-1"
3 "HDMI-1"
4 "HDMI-1"
5 "HDMI-1"
6 "eDP-1"
7 "HDMI-1"
8 "HDMI-1"
9 "HDMI-1"))
(setq exwm-randr-workspace-output-plist '(0 second-screen
1 second-screen
2 second-screen
3 second-screen
4 second-screen
5 second-screen
6 "eDP-1"
7 second-screen
8 second-screen
9 second-screen))
(add-hook 'exwm-randr-screen-change-hook
(lambda ()
(start-process-shell-command
"xrandr" nil "xrandr --output HDMI-1 --above eDP-1 --mode 1920x1080")))
"xrandr" nil (concat "xrandr --output " second-screen " --above eDP-1 --mode 1920x1080")))
(exwm-randr-enable)))