meme_generator.clj

(cmd-hook #"meme"
          #"^popular$" (chat-instance-popular)
          #"^trending$" (chat-meme-list
                          (gen-trending))
          #"^search\s(.+)" (chat-meme-list
                             (search-generators (second p)))
          #"(\w+)\s(.+)\/(.+)$" (chat-instance
                                  (create-instance
                                    (map-to-query-string
                                      (build-instance-params
                                        (nth p 1) (nth p 2) (nth p 3))))))