summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorThanos Apollo <[email protected]>2023-08-16 14:48:19 +0300
committerThanos Apollo <[email protected]>2023-08-16 14:48:19 +0300
commit1f08185774a68dd48eb675f753f9260a04e5045f (patch)
tree32aecb39ce088b26e8feb83195555627d2e84391
parentef57af4bba6a1bc8d80c0b61c15ad1779f4ef6a8 (diff)
use backquoted list for (videoids videotitles)
This will make it easier to add more info in the future
-rw-r--r--yeetube.el10
1 files changed, 4 insertions, 6 deletions
diff --git a/yeetube.el b/yeetube.el
index a5676e1..e4514ab 100644
--- a/yeetube.el
+++ b/yeetube.el
@@ -257,7 +257,7 @@ It's recommended you keep it as the default value."
(format "searching: %s\nfor: %s \n* Search Results: \n \n" yeetube-query-url query))
(dolist (pair (reverse content))
(let ((videoid (car pair))
- (title (yeetube-fix-title (cdr pair))))
+ (title (yeetube-fix-title (cadr pair))))
;; gap [%s ] for titles that end with ]
(insert (format "%s [[%s/watch?v=%s][%s ]]\n"
yeetube-results-prefix yeetube-query-url videoid title))))
@@ -315,7 +315,7 @@ It's recommended you keep it as the default value."
(if (string-match-p "vssLoggingContext" title)
(pop video-ids)
(push title video-titles)
- (push (cons videoid title) yeetube-content))))))))
+ (push `(,videoid ,title) yeetube-content))))))))
;; same as youtube but with different values, it's easier this way
;; even though it's "wrong". It would be better if we could have a
@@ -346,10 +346,8 @@ It's recommended you keep it as the default value."
(title (buffer-substring
(+ title-start 0)
(- title-end 4))))
- (if (string-match-p "vssLoggingContext" title)
- (pop video-ids)
- (push title video-titles)
- (push (cons videoid title) yeetube-content))))))))
+ (push title video-titles)
+ (push `(,videoid ,title) yeetube-content)))))))
;;;###autoload
(defun yeetube-download-video ()