summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorsostler <sbostler@gmail.com>2009-12-06 20:59:00 -0500
committersostler <sbostler@gmail.com>2009-12-06 20:59:00 -0500
commit39375c859ab3523e6312015388d9f2f462f66db1 (patch)
treeecd8a3aa9189bc49841e65c3f726ad77a8727fed
parent631f492c328ee40414ee32f717215d3fdda6f55a (diff)
fixed npe'
-rw-r--r--src/site.clj4
1 files changed, 3 insertions, 1 deletions
diff --git a/src/site.clj b/src/site.clj
index 1c43ae3..3e9a873 100644
--- a/src/site.clj
+++ b/src/site.clj
@@ -203,7 +203,9 @@
(do
(.setAttribute st "is_home" is-home)
(doseq [a [:nick :avatar :contact :bio]]
- (.setAttribute st (name a) (encode-html-entities (or (user-info a) nil))))
+ (let [v (user-info a)]
+ (.setAttribute st (name a)
+ (if v (encode-html-entities v) ""))))
(.setAttribute st "dumps"
(to-array (map process-message-for-output dumps)))
(.toString st)))