From 692e2d725f278708324fd2534007448ed03a150d Mon Sep 17 00:00:00 2001 From: sostler Date: Fri, 15 Jan 2010 13:23:30 -0500 Subject: removed set-user-attributes --- src/site.clj | 13 ++++--------- 1 file changed, 4 insertions(+), 9 deletions(-) diff --git a/src/site.clj b/src/site.clj index d387247..5868f94 100755 --- a/src/site.clj +++ b/src/site.clj @@ -194,17 +194,12 @@ ;; Templates -(defn set-user-attributes [st session] - (if (session :nick) - (.setAttribute st "user_nick" (session :nick)) - (.setAttribute st "isadmin" (session :is_admin)))) - (defn fetch-template [template-name session] (let [st (.getInstanceOf template-group template-name)] - (and st - (do - (set-user-attributes st session) - st)))) + (if (and st (session :nick)) + (do (.setAttribute st "user_nick" (session :nick)) + (.setAttribute st "isadmin" (session :is_admin)))) + st)) ;; Landing -- cgit v1.2.3-70-g09d2