aboutsummaryrefslogtreecommitdiffstats
path: root/yeetube.el
diff options
context:
space:
mode:
Diffstat (limited to 'yeetube.el')
-rw-r--r--yeetube.el12
1 files changed, 9 insertions, 3 deletions
diff --git a/yeetube.el b/yeetube.el
index 434be23..b17acee 100644
--- a/yeetube.el
+++ b/yeetube.el
@@ -294,10 +294,16 @@ This is used to download thumbnails from `yeetube-content', within
(unless wget-exec
(error "Please install `wget', to download thumbnails"))
(cl-loop for item in content
- do (let ((title (plist-get item :title))
- (thumbnail (plist-get item :thumbnail)))
+ do (let ((thumbnail (plist-get item :thumbnail)))
(call-process-shell-command
- (concat "wget " (shell-quote-argument thumbnail) " -O" (shell-quote-argument title))
+ (format "%s %s %s %s" wget-exec
+ (shell-quote-argument thumbnail)
+ "-O"
+ (concat (replace-regexp-in-string
+ "\\(.*\\)\\(\\(.\\{10\\}\\)\\)$"
+ "\\2"
+ thumbnail)
+ ".jpg"))
nil 0)))))
(defvar yeetube-filter-code-alist