summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/mulk/benki/util.clj6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/mulk/benki/util.clj b/src/mulk/benki/util.clj
index dd118bb..46e187d 100644
--- a/src/mulk/benki/util.clj
+++ b/src/mulk/benki/util.clj
@@ -76,6 +76,9 @@
(defn link [& args]
(resolve-uri (apply linkrel args)))
+(defn redirect [x]
+ {:status 302, :headers {"Location" x}, :body ""})
+
(defn call-with-auth [thunk]
(if *user*
(thunk)
@@ -88,9 +91,6 @@
(defmacro with-auth [& body]
`(call-with-auth (fn [] ~@body)))
-(defn redirect [x]
- {:status 302, :headers {"Location" x}, :body ""})
-
(defn format-date [x]
(.format (DateFormat/getDateTimeInstance DateFormat/FULL DateFormat/FULL)
x))