summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--common/.emacs.d/init.el12
1 files changed, 11 insertions, 1 deletions
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)