diff options
author | Thanos Apollo <[email protected]> | 2023-08-16 14:48:19 +0300 |
---|---|---|
committer | Thanos Apollo <[email protected]> | 2023-08-16 14:48:19 +0300 |
commit | 1f08185774a68dd48eb675f753f9260a04e5045f (patch) | |
tree | 32aecb39ce088b26e8feb83195555627d2e84391 | |
parent | ef57af4bba6a1bc8d80c0b61c15ad1779f4ef6a8 (diff) |
use backquoted list for (videoids videotitles)
This will make it easier to add more info in the future
-rw-r--r-- | yeetube.el | 10 |
1 files changed, 4 insertions, 6 deletions
@@ -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 () |