From ec6341ecf1fb11904b812a5c04e8af4098ea0fd9 Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Thu, 13 Jul 2023 06:46:31 +0300 Subject: Add yeetube--draw-buffer Seperate the creation of *Yeetube Search* buffer to an "isolated" function. Making yeetube-search less complicated. --- yeetube.el | 35 +++++++++++++++++++---------------- 1 file changed, 19 insertions(+), 16 deletions(-) diff --git a/yeetube.el b/yeetube.el index c561717..c083cb6 100644 --- a/yeetube.el +++ b/yeetube.el @@ -177,6 +177,24 @@ PREFIX [[URL/watch?v=VIDEOID][VIDEOTITLE ]]" prefix url video-id (yeetube-fix-title video-title))))) +(defun yeetube--draw-buffer (query video-titles video-ids) + "Create *Yeetube-Search* buffer for QUERY, using VIDEO-TITLES with VIDEO-IDS." + (with-current-buffer + (switch-to-buffer + (get-buffer-create "*Yeetube Search*")) + (setq buffer-read-only nil) + (erase-buffer) + (org-mode) + (insert + (format "searching: %s\nfor: %s \n* Search Results: \n \n" yeetube-query-url query)) + (yeetube-insert-content + yeetube-results-prefix yeetube-query-url + video-titles video-ids) + (yeetube-insert-info) + (setq buffer-read-only t) + (goto-char (point-min)) + (search-forward yeetube-results-prefix) + (yeetube-mode))) (defun yeetube-search (query) "Search for QUERY." @@ -232,22 +250,7 @@ PREFIX [[URL/watch?v=VIDEOID][VIDEOTITLE ]]" (if (string-match-p "vssLoggingContext" title) (pop video-ids) (push title video-titles))))))) - (with-current-buffer - (switch-to-buffer - (get-buffer-create "*Yeetube Search*")) - (setq buffer-read-only nil) - (erase-buffer) - (org-mode) - (insert - (format "searching: %s\nfor: %s \n* Search Results: \n \n" yeetube-query-url query)) - (yeetube-insert-content - yeetube-results-prefix yeetube-query-url - video-titles video-ids) - (yeetube-insert-info) - (setq buffer-read-only t) - (goto-char (point-min)) - (search-forward yeetube-results-prefix) - (yeetube-mode)))) + (yeetube--draw-buffer query video-titles video-ids))) (defun yeetube-download-video () "Download using link at point in an `'org-mode buffer with yt-dlp." -- cgit v1.2.3