;; time and battery in mode-line
(use-feature time
+ :disabled
:demand
:config
(display-time-mode)
(display-time-format "%a %b %-e, %-l:%M%P"))
(use-feature battery
+ :disabled
:demand
:config
(display-battery-mode)
;;; Essential packages
(use-package exwm
+ :disabled
:demand
:config
;; make class name the buffer name, truncating beyond 60 characters
:demand
:after exwm
:config
- (exwm-randr-enable))
+ (exwm-randr-enable)
+ :custom
+ (exwm-randr-workspace-monitor-plist '(1 "VGA-1"))
+ :hook
+ (exwm-randr-screen-change . (lambda ()
+ (let ((xrandr
+ (string-join
+ '("xrandr"
+ "--output VGA-1"
+ "--same-as LVDS-1"
+ "--auto")
+ " ")))
+ (start-process-shell-command
+ "xrandr" nil xrandr)))))
(use-feature exwm-systemtray
:demand