From 5da2b10b8e721fcf9c068e991b7843007e2cc1ae Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Tue, 1 Aug 2023 11:26:11 +0300 Subject: Rename: yeetube-check-if-youtube to yeetube-youtube-p Rename: yeetube-check-if-youtube to yeetube-youtube-p Autoload yeetube-search --- yeetube.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/yeetube.el b/yeetube.el index ae82fdb..327ba7a 100644 --- a/yeetube.el +++ b/yeetube.el @@ -122,6 +122,7 @@ It's recommended you keep it as the default value." (defvar yeetube--video-titles '()) (defun yeetube-check-if-youtube (url) +(defun yeetube-youtube-p (url) "Check if it's a youtube URL." (if (string-match-p "youtube" url) t @@ -217,10 +218,11 @@ PREFIX [[URL/watch?v=VIDEOID][VIDEOTITLE ]]" (search-forward yeetube-results-prefix) (yeetube-mode))) +;;;###autoload (defun yeetube-search (query) "Search for QUERY." (interactive "sYeetube Search: ") - (let ((is-youtube? (yeetube-check-if-youtube yeetube-query-url))) + (let ((is-youtube? (yeetube-youtube-p yeetube-query-url))) (with-current-buffer (url-retrieve-synchronously (concat yeetube-query-url -- cgit v1.2.3