From 44ea412b45b7838ee786cbb6c368ffb8646729f6 Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Thu, 6 Jul 2023 09:21:12 +0300 Subject: yeetube-insert-content: renames rename camel-case variables -> proper lisp names using dashes --- yeetube.el | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) diff --git a/yeetube.el b/yeetube.el index 1acfc62..1e4ccfc 100644 --- a/yeetube.el +++ b/yeetube.el @@ -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." -- cgit v1.2.3