diff options
author | Thanos Apollo <[email protected]> | 2023-08-03 23:53:15 +0300 |
---|---|---|
committer | Thanos Apollo <[email protected]> | 2023-08-03 23:53:15 +0300 |
commit | 797ad69dd206e6108b8ff9ad92d3d77325650e14 (patch) | |
tree | 21cab326b2d3753ea63a26b095ae87f7db5ad2c9 | |
parent | cb8d20bd41cde07f20d8efe9f9c2cf1044b3e701 (diff) |
remove yeetube-insert-content
This is too much of a common-lisp function, plus it's better to have
it less complex using something like dolist.
-rw-r--r-- | yeetube.el | 17 |
1 files changed, 0 insertions, 17 deletions
@@ -238,23 +238,6 @@ It's recommended you keep it as the default value." replacements) title)) -(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. -- 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 (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 video-id - (yeetube-fix-title video-title))))) - (defun yeetube-create-buffer (query video-titles video-ids) "Create *Yeetube-Search* buffer for QUERY, using VIDEO-TITLES with VIDEO-IDS." (with-current-buffer |