From d1c33baad3959d50c59e6b62bb9c6f3d9fadc764 Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Wed, 19 Jul 2023 11:43:08 +0300 Subject: (style):Restracture and rename functions Rename yeetube--draw-buffer -> yeetube-create-buffer Remove (interactive) from yeetube--get-title Move yeetube--video-ids & titles at the top --- yeetube.el | 13 ++++++------- 1 file changed, 6 insertions(+), 7 deletions(-) diff --git a/yeetube.el b/yeetube.el index 6df9333..b02c89d 100644 --- a/yeetube.el +++ b/yeetube.el @@ -115,6 +115,10 @@ It's recommended you keep it as the default value." (defvar yeetube--yt-dlp (executable-find "yt-dlp")) +(defvar yeetube--video-ids '()) + +(defvar yeetube--video-titles '()) + (defun yeetube-check-if-youtube (url) "Check if it's a youtube URL." (if (string-match-p "youtube" url) @@ -183,7 +187,7 @@ PREFIX [[URL/watch?v=VIDEOID][VIDEOTITLE ]]" prefix url video-id (yeetube-fix-title video-title))))) -(defun yeetube--draw-buffer (query video-titles video-ids) +(defun yeetube-create-buffer (query video-titles video-ids) "Create *Yeetube-Search* buffer for QUERY, using VIDEO-TITLES with VIDEO-IDS." (with-current-buffer (switch-to-buffer @@ -202,10 +206,6 @@ PREFIX [[URL/watch?v=VIDEOID][VIDEOTITLE ]]" (search-forward yeetube-results-prefix) (yeetube-mode))) - -(defvar yeetube--video-ids '()) -(defvar yeetube--video-titles '()) - (defun yeetube-search (query) "Search for QUERY." (interactive "sYeetube Search: ") @@ -221,7 +221,7 @@ PREFIX [[URL/watch?v=VIDEOID][VIDEOTITLE ]]" (if is-youtube? (yeetube--get-content-youtube) (yeetube--get-content-invidious)) - (yeetube--draw-buffer query yeetube--video-titles yeetube--video-ids)))) + (yeetube-create-buffer query yeetube--video-titles yeetube--video-ids)))) (defun yeetube--get-content-youtube () @@ -393,7 +393,6 @@ then run this command interactively." (defun yeetube--get-title () "Get the title of the latest video/song played." - (interactive) (push-mark) (search-backward yeetube-results-prefix) (set-mark-command nil) -- cgit v1.2.3