Fix search regex match on meme command

yetibot · Mar 28, 2023 · a193fd1 · a193fd1
1 parent d7f152d
commit a193fd1
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 1 deletion.
diff --git a/src/yetibot/commands/meme.clj b/src/yetibot/commands/meme.clj
@@ -77,7 +77,7 @@
   (cmd-hook
    ["meme" #"^meme$"]
    #"^popular$" chat-instance-popular
-   #"^(?:search\s)?(.+)" search-cmd
+   #"^search\s+(.+)$" search-cmd
    #"^(.+?)\s*:(.+)\/(.*)$" generate-cmd
    #"^(.+?)\s*:(.+)$" generate-auto-split-cmd
    #"^preview\s+(.+)" preview-cmd

diff --git a/src/yetibot/models/imgflip.clj b/src/yetibot/models/imgflip.clj
@@ -145,6 +145,7 @@
   )
 
 (defn generate-meme-by-query [query text0 & [text1]]
+  (info "generate-meme-by-query" {:query query :text0 text0})
   (if-let [meme (first (search-memes query))]
     (apply generate-meme
            (into [(:id meme)]
@@ -156,3 +157,6 @@
     {:success false
      :error_message (str "Couldn't find any memes for " query)}))
 
+(comment
+  (generate-meme-by-query "lipstick" "text0")
+  )