From 6666c9150f01a90c279e8b414e839ade2b0a4837 Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Wed, 30 Aug 2023 14:57:41 +0300 Subject: yeetube-download-videos: remove audio-only option --- yeetube.el | 15 +-------------- 1 file changed, 1 insertion(+), 14 deletions(-) (limited to 'yeetube.el') diff --git a/yeetube.el b/yeetube.el index 3b1c644..981a47e 100644 --- a/yeetube.el +++ b/yeetube.el @@ -430,11 +430,7 @@ prompt blank to keep the default name." (let ((url "") (name "") (download-counter 1) - (audio-only-p (y-or-n-p "Download videos as audio only format?")) (stored-contents nil)) - (if audio-only-p - (yeetube-change-download-audio-format (read-string "Specify audio format: ")) - (yeetube-change-download-audio-format nil)) ;; Read links and names until "q" is entered (while (not (string= url "q")) (setq url (read-string "Enter URL (q to quit): ")) @@ -447,16 +443,7 @@ prompt blank to keep the default name." (let ((url (car pair)) (name (cdr pair))) (call-process-shell-command - (if yeetube-download-audio-format - (format "%s '%s' --extract-audio --audio-format %s -o %s" - (shell-quote-argument yeetube-yt-dlp) - (shell-quote-argument url) - (shell-quote-argument yeetube-download-audio-format) - (shell-quote-argument name)) - (format "%s '%s' -o %s" - (shell-quote-argument yeetube-yt-dlp) - (shell-quote-argument url) - (shell-quote-argument name))) + (format "%s '%s' -o %s" (executable-find "yt-dlp") url name) nil 0))))) (defun yeetube-insert-info () -- cgit v1.2.3