639612e93fe8

--- a/stumpwmrc	Fri Jun 21 09:50:25 2019 -0700
+++ b/stumpwmrc	Mon Jun 24 16:16:16 2019 -0700
@@ -322,6 +322,9 @@
 (defcommand toggle-current-mode-line () ()
   (toggle-mode-line (current-screen) (current-head)))
 
+(defcommand toggle-stumptray () ()
+  (run-commands "stumptray"))
+
 (defcommand pass-personal () ()
   (let ((pass:*password-store* "/home/sjl/.password-store/")
         (pass:*pass-notification-message* t))
@@ -530,7 +533,8 @@
 
 (define-top-keys ;; stump
   ("Pause" "terminal") ; jesus christ
-  ("H-F10" "sleep-machine")
+  ("H-F9" "sleep-machine")
+  ("H-F10" "toggle-stumptray")
   ("H-F11" "toggle-current-mode-line")
   ("H-F12" "refresh-heads"))