From ff6d46eb611b82ea48746ba4bdf9a563298ac519 Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Mon, 5 Sep 2022 15:27:48 +0100
Subject: player-specific volume controls not used

---
 attic/misc.el | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)

(limited to 'attic')

diff --git a/attic/misc.el b/attic/misc.el
index a720042..d448ae7 100644
--- a/attic/misc.el
+++ b/attic/misc.el
@@ -301,6 +301,24 @@
     (goto-char (point-min))
     (when (re-search-forward "^[Mm]essage-[Ii][Dd]: <?\\([^><]+\\)>?" nil t)
       (match-string 1))))
+;;; old volume controls
+(defun jao-player-volume-delta (raise)
+  (jao-player-vol-delta (if raise 5 -5))
+  (sit-for 0.05)
+  (jao-player-show-volume))
+
+(defun jao-player-volume-raise ()
+  (interactive)
+  (jao-player-volume-delta t))
+
+(defun jao-player-volume-lower ()
+  (interactive)
+  (jao-player-volume-delta nil))
+
+(defun jao-player-show-volume ()
+  (interactive)
+  (jao-notify "Volume" (format "%s%%" (jao-player-volume))))
+
 ;;; snippets
 (defun jao-sway-run-or-focus-tidal ()
   (interactive)
-- 
cgit v1.2.3