diff options
| author | Matthias Andreas Benkard <code@mail.matthias.benkard.de> | 2012-06-17 15:23:35 +0200 |
|---|---|---|
| committer | Matthias Andreas Benkard <code@mail.matthias.benkard.de> | 2012-06-17 15:23:35 +0200 |
| commit | 7c57376a3f9a4cebfedb693dedb37131c922c7e3 (patch) | |
| tree | b0ac3a6c5f60510d38534d7806bb669ccfeb373d /src | |
| parent | b36958c4505edbe32aabc3acf911f35de7d7c531 (diff) | |
benki.util: Fix order of definitions.
Diffstat (limited to 'src')
| -rw-r--r-- | src/mulk/benki/util.clj | 6 |
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)) |