         end
       end
     end"
-   {:qk-messages       (qkey qname "hash" "messages")
-    :qk-locks          (qkey qname "hash" "locks")
-    :qk-id-circle      (qkey qname "list" "id-circle")
-    :qk-recently-done  (qkey qname "set"  "recently-done")
-    :qk-backoff        (qkey qname "flag" "backoff?")}
+   {:qk-messages       (qkey qname "messages")
+    :qk-locks          (qkey qname "locks")
+    :qk-id-circle      (qkey qname "id-circle")
+    :qk-recently-done  (qkey qname "recently-done")
+    :qk-backoff        (qkey qname "backoff?")}
    {:current-time      (str (System/currentTimeMillis))
     :handler-ttl-msecs (str handler-ttl-msecs)
     :backoff-msecs     (str backoff-msecs)

  (wcar (doall (map #(enqueue "myq" (str %)) (range 10))))

  (wcar (dequeue-1 "myq"))
  (wcar (car/lrange (qkey "myq" "list" "id-circle") 0 -1))

  (def my-buggy-worker
    (make-dequeue-worker

  (:import  [java.util UUID]))

(def ^:private qkey "Prefixed queue key"
  (memoize (car/make-keyfn "mqueue")))

(defn enqueue
  "Pushes given message (any Clojure datatype) to named queue. Returns message
