summaryrefslogtreecommitdiffhomepage
path: root/attic/misc.el
diff options
context:
space:
mode:
Diffstat (limited to 'attic/misc.el')
-rw-r--r--attic/misc.el18
1 files changed, 18 insertions, 0 deletions
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)