0f6c567726d4
Sigh
author | Steve Losh <steve@stevelosh.com> |
---|---|
date | Tue, 24 Aug 2021 16:08:56 -0400 |
parents | 1720a1e79e8b |
children | 96b9cf7e7a90 |
branches/tags | (none) |
files | stumpwmrc |
Changes
--- a/stumpwmrc Mon Aug 23 19:33:39 2021 -0400 +++ b/stumpwmrc Tue Aug 24 16:08:56 2021 -0400 @@ -407,7 +407,11 @@ (defcommand toggle-zoom-mute () () (when-let-window (win "^Zoom Meeting.*") - (focus-window win t) ; Zoom stupidly won't accept the shortcut unless it's in focus + ;; Zoom stupidly won't accept the shortcut unless it's in focus + (unless (eql (window-group win) (current-group)) + ;; jesus christ stump just export switch-to-group come on + (gselect (princ-to-string (group-number (window-group win))))) + (focus-window win t) (meta (kbd "M-a")))) (defcommand end-zoom () ()