     (if (.startsWith message "!burrito")
         (send-message irc channel
             (generate-burrito)))
+    (if (.startsWith message "!comment")
+        (send-message irc channel
+            (pick-random-youtube-comment)))
     (if (.startsWith message "!memory")
         (send-message irc channel
             (let [

    ", please!"
))

; BURRITO!

(defn on-message [{:keys [nick channel message irc]} state-ref]
    (log-sentence! message)

    (:use
        [clojure.contrib.command-line]
        [clojure.java.io]
        [clojure.xml]
        [clojure.string :only [join]]
        [irclj.core]
    )
