diff options
| -rw-r--r-- | yeetube-mpv.el | 6 | ||||
| -rw-r--r-- | yeetube.el | 1 |
2 files changed, 7 insertions, 0 deletions
diff --git a/yeetube-mpv.el b/yeetube-mpv.el index 5b43ae1..2c925a4 100644 --- a/yeetube-mpv.el +++ b/yeetube-mpv.el @@ -45,6 +45,12 @@ Accepted values include: 1080, 720, 480, 360, 240, 144") +(defun yeetube-mpv-change-video-quality () + (interactive) + (let ((new-value (completing-read (format "Set video quality (current value %s):" yeetube-mpv-video-quality) + '("1080" "720" "480" "360" "240" "144") nil t))) + (setf yeetube-mpv-video-quality new-value))) + (defun yeetube-mpv-toggle-torsocks () "Toggle torsocks." (interactive) @@ -481,6 +481,7 @@ FIELDS-FACE-PAIRS is a list of fields and faces." "r" #'yeetube-replay "t" #'yeetube-view-thumbnail "T" #'yeetube-mpv-toggle-torsocks + "C-q" #'yeetube-mpv-change-video-quality "q" #'quit-window) (define-derived-mode yeetube-mode tabulated-list-mode "Yeetube" |