From 6dd1290ddb25bcce9263bfdd5983ec8c9b00e529 Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Thu, 3 Aug 2023 23:57:31 +0300 Subject: yeetube-change-query-url: Redo with argument input --- yeetube.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/yeetube.el b/yeetube.el index 1443261..2f08507 100644 --- a/yeetube.el +++ b/yeetube.el @@ -432,10 +432,10 @@ prompt blank to keep the default name." (when (equal yeetube-download-audio-format "no") (setq yeetube-download-audio-format nil))) -(defun yeetube-change-query-url () - "Change `yeetube-query-url'." - (interactive) - (setq yeetube-query-url (read-string "URL: ")) +(defun yeetube-change-query-url (url) + "Change `yeetube-query-url' to URL." + (interactive "sURL:") + (setq yeetube-query-url url) (when (string-prefix-p "localhost" yeetube-query-url) (setq yeetube-query-url (concat "http://localhost:" (read-string "Port: ")))) (unless (or (string-prefix-p "http://" yeetube-query-url) -- cgit v1.2.3