From c6e759276c80f973fd9a7d095c08c85d983a580d Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Fri, 14 Jun 2024 10:48:47 +0300 Subject: yeetube-download-video: Add optional arg for url --- yeetube.el | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/yeetube.el b/yeetube.el index b6828d0..6780b8b 100644 --- a/yeetube.el +++ b/yeetube.el @@ -563,10 +563,13 @@ Optional values: (call-process-shell-command command nil 0))) ;;;###autoload -(defun yeetube-download-video () - "Download entry at point in *yeetube* buffer with yt-dlp." +(defun yeetube-download-video (&optional url) + "Download entry at point in *yeetube* buffer with yt-dlp. + +Content will be downloaded at `yeetube-download-directory'. +Optionally, provide custom own URL." (interactive) - (let ((url (yeetube-get-url))) + (let ((url (or url (yeetube-get-url)))) (when (string-prefix-p "http" url) (let ((default-directory yeetube-download-directory)) (yeetube-download--ytdlp url nil yeetube-download-audio-format) -- cgit v1.2.3