                                 (debug request))
 
   (GET "/demo" request
-    (iframe-demo request)) (POST "/short/create-db" []
-                             (create-database))
+    (iframe-demo request))
+
+  (GET "/short/create-db" []
+    (create-database))
 
   (POST "/short/new/:url" [url]
     (new-url url))


(defn -main [& [port]]
  (let [port (Integer. (or port (env :port) 3000))]
    (jetty/run-jetty (site #'app) {:port port :join? false})))

  (ANY "*" []
    (route/not-found (slurp (io/resource "404.html")))))


(def app
  (-> app-routes
