   (:import  [java.util UUID]))
 
 (def ^:private qkey "Prefixed queue key"
-  (memoize (car/make-keyfn "carmine" "queue")))
+  (memoize (car/make-keyfn "mqueue")))
 
 (defn enqueue
   "Pushes given message (any Clojure datatype) to named queue. Returns message


                  (try (handler-fn message-content)
                       (car/with-conn pool spec
                         (car/sadd (qkey qname "set" "recently-done")
                                       message-id))
                       (catch Exception e
                         (timbre/error

    end

    return {_:msg-id, redis.call ('lpush', _:qk-id-circle, _:msg-id)}"
   {:qk-messages  (qkey qname "messages")
    :qk-id-circle (qkey qname "id-circle")}
   {:msg-id       (str (UUID/randomUUID))
    :msg-content  (car/preserve message)}))

