diff options
-rw-r--r-- | yeetube.el | 14 |
1 files changed, 7 insertions, 7 deletions
@@ -134,22 +134,22 @@ Example Usage: (replace-regexp-in-string "'" "'" (replace-regexp-in-string """ "\"" title))) -(defun yeetube-insert-content (prefix url videoTitles videoIds) +(defun yeetube-insert-content (prefix url video-titles video-ids) "Insert video links with titles into the buffer. Arguments: - PREFIX: The prefix string for each link. - URL: The base URL for the YouTube links. -- VIDEOTITLES: A list of video titles. -- VIDEOIDS: A list of video IDs. +- VIDEO-TITLES: A list of video titles. +- VIDEO-IDS: A list of video IDs. For each video ID and video title, inserts a link into the buffer in the format: PREFIX [[URL/watch?v=VIDEOID][VIDEOTITLE ]]" - (cl-loop for (videoId . videoTitle) in - (cl-mapcar #'cons (reverse videoIds) (reverse videoTitles)) + (cl-loop for (video-id . video-title) in + (cl-mapcar #'cons (reverse video-ids) (reverse video-titles)) do (insert (format "%s [[%s/watch?v=%s][%s ]]\n" - prefix url videoId - (yeetube-fix-title videoTitle))))) + prefix url video-id + (yeetube-fix-title video-title))))) (defun yeetube-search (query) "Search for QUERY." |