--- a/stumpwmrc Sun Aug 12 22:48:32 2018 +0000
+++ b/stumpwmrc Mon Aug 13 22:20:33 2018 +0000
@@ -114,7 +114,7 @@
;;;; Brightness ---------------------------------------------------------------
(defparameter *brightness-values* #(0 1 10 25 50 75 100))
-(defparameter *brightness-index* 2)
+(defvar *brightness-index* 5)
(defun brightness ()
(aref *brightness-values* *brightness-index*))
@@ -189,7 +189,7 @@
(,extern ("--off"))
(,laptop ("--auto"))
(,laptop ("--primary"))
- (,extern ("--mode" "3440x1440"))
+ (,extern ("--mode" "2560x1440"))
(,extern ("--left-of" ,laptop)))
do (uiop:run-program `("xrandr" "--output" ,output ,@commands))))
@@ -316,6 +316,7 @@
("s-l" . "C-l")
("s-t" . "C-t")
("s-w" . "C-w")
+ ("s-r" . "C-r")
("s-z" . "C-z")
("s-x" . "C-x")
("s-c" . "C-c")
@@ -367,14 +368,15 @@
;;;; System Tray --------------------------------------------------------------
(load-module "stumptray")
-(run-commands "stumptray")
+(defvar *tray-loaded* (run-commands "stumptray"))
+
;;;; Startup ------------------------------------------------------------------
-(defparameter *network-manager*
+(defvar *network-manager*
(run-shell-command "nm-applet --sm-disable"))
-(defparameter *dropbox*
+(defvar *dropbox*
(run-shell-command "~/.dropbox-dist/dropboxd"))
-(defparameter *dunst*
+(defvar *dunst*
(run-shell-command "/usr/bin/dunst -conf ~/.dunstrc"))