 (defn redirect-to-not-found
   []
   [true not-found])
-
-(defn make-route
-  "Create data sctructure that represents a `bidi` route."
-  ([method url func]
-   (make-route method url func {}))
-
-  ([method url func options]
-   (let [{:keys [tag]} options
-         handler (if (nil? tag)
-                   func
-                   (bidi/tag func tag))]
-     {method [url handler]})))

  (:require [bidi.bidi        :refer [match-route path-for] :as bidi]
            [hellhound.system :refer [get-system]]
            [bidi.ring        :as biring]
            [taoensso.timbre  :as log]))



  ;; TODO: We should provide a better view of routes here
  {:status 404
   :headers {"Content-Type" "text/html"}
   :body (str "<pre>"
              (clojure.string/replace (with-out-str
                                        (pprint (route-table)))
                                      "\n" "<br />")
              "</pre>")})


(defn hellhound-routes
