From badc40d9c35328fbb5176b416ca64c034a10fe77 Mon Sep 17 00:00:00 2001 From: Simon Parri Date: Sat, 22 Nov 2025 12:04:10 -0600 Subject: Emacs/Mobile-Device: Pop up pulsemixer in `mobile-device-volume-mode' --- common/.emacs.d/init.el | 12 +++++++++++- 1 file changed, 11 insertions(+), 1 deletion(-) diff --git a/common/.emacs.d/init.el b/common/.emacs.d/init.el index 67aaecc..0b1d0ec 100644 --- a/common/.emacs.d/init.el +++ b/common/.emacs.d/init.el @@ -4072,10 +4072,20 @@ instead." :global t :lighter " Navig") + (defvar mobile-device-volume--buffer nil) (define-minor-mode mobile-device-volume-mode "Minor mode to change volume for tablet/phone UI." :global t - :lighter " ChVol")) + :lighter " ChVol" + (when mobile-device-volume--buffer + (let ((kill-buffer-query-functions ())) + (kill-buffer mobile-device-volume--buffer)) + (setq mobile-device-volume--buffer nil)) + (when mobile-device-volume-mode + (setq mobile-device-volume--buffer + (with-current-buffer (eat "pulsemixer" t) + (rename-buffer "*volume*") + (current-buffer)))))) (progn ;; term (defun spawn-term (&optional dir) -- cgit v1.2.3