diff options
| author | bd <bdunahu@operationnull.com> | 2025-10-21 10:29:25 -0400 |
|---|---|---|
| committer | bd <bdunahu@operationnull.com> | 2025-10-21 10:29:25 -0400 |
| commit | 51302537bbe27f8dcdc7c1a6c66e21127d46c6c5 (patch) | |
| tree | 4b3c603c1a7dee2ed8e8742f76dfa9fb66d14995 | |
| parent | 1e4230e64fa6bb844b4bcd6f86fe23d147540c9b (diff) | |
bd/set-frame-alpha now sets all frames at once
| -rw-r--r-- | .config/emacs/modules/bd--utility.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/.config/emacs/modules/bd--utility.el b/.config/emacs/modules/bd--utility.el index 33e2285..1d80b65 100644 --- a/.config/emacs/modules/bd--utility.el +++ b/.config/emacs/modules/bd--utility.el @@ -7,10 +7,13 @@ (defun bd/set-frame-alpha (value) - "Set the transparency of the frame background to VALUE. 0=transparent/100=opaque." + "Set the transparency of ALL frame backgrounds to VALUE. 0=transparent/100=opaque." (interactive "nTransparency Value (50 - 100 opaque): ") (setq value (max 50 (min value 100))) (set-frame-parameter (selected-frame) 'alpha `(,value . ,value)) + (mapc (lambda (f) + (set-frame-parameter f 'alpha `(,value . ,value))) + (frame-list)) (message "Alpha set to %d" value)) (defun bd/set-bg (&optional arg) |