summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorMatthias Andreas Benkard <code@mail.matthias.benkard.de>2012-06-17 15:23:35 +0200
committerMatthias Andreas Benkard <code@mail.matthias.benkard.de>2012-06-17 15:23:35 +0200
commit7c57376a3f9a4cebfedb693dedb37131c922c7e3 (patch)
treeb0ac3a6c5f60510d38534d7806bb669ccfeb373d /src
parentb36958c4505edbe32aabc3acf911f35de7d7c531 (diff)
benki.util: Fix order of definitions.
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))