summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorThanos Apollo <[email protected]>2024-02-29 22:27:59 +0200
committerThanos Apollo <[email protected]>2024-02-29 22:27:59 +0200
commit68f9f626e3eb63c1bcdc49c958eefc0ff3536f09 (patch)
tree3dec902d5f090f9e26077975cd37ccde92584af7
parent0ffe19e98ea0e4aba3ce24df4972ba0af7911bca (diff)
Rename yeetube-player -> yeetube-play-function
-rw-r--r--yeetube.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/yeetube.el b/yeetube.el
index 1c9ba15..80b9798 100644
--- a/yeetube.el
+++ b/yeetube.el
@@ -56,7 +56,7 @@
:type 'number
:group 'yeetube)
-(defcustom yeetube-player #'yeetube-mpv-play
+(defcustom yeetube-play-function #'yeetube-mpv-play
"Select media player function."
:type 'function
:group 'yeetube)
@@ -212,7 +212,7 @@ Keywords:
(interactive)
(let ((video-url (yeetube-get-url))
(video-title (yeetube-get :title)))
- (funcall yeetube-player video-url)
+ (funcall yeetube-play-function video-url)
(push (list :url video-url :title video-title) yeetube-history)
(message "Playing: %s" video-title)))
@@ -226,7 +226,7 @@ Select entry title from yeetube-history and play corresponding URL."
(selected (completing-read "Replay: " titles))
(selected-entry (cl-find-if (lambda (entry) (string= selected (cl-getf entry :title))) yeetube-history))
(url (cl-getf selected-entry :url)))
- (funcall yeetube-player url)
+ (funcall yeetube-play-function url)
(message "Replaying: %s" selected)))
(defun yeetube-load-saved-videos ()
@@ -257,7 +257,7 @@ Select entry title from yeetube-history and play corresponding URL."
(interactive)
(yeetube-load-saved-videos)
(let ((video (completing-read "Select video: " yeetube-saved-videos nil t)))
- (funcall yeetube-player (cdr (assoc video yeetube-saved-videos)))
+ (funcall yeetube-play-function (cdr (assoc video yeetube-saved-videos)))
(message "Playing: %s" (car (assoc video yeetube-saved-videos)))))
;;;###autoload