From 39375c859ab3523e6312015388d9f2f462f66db1 Mon Sep 17 00:00:00 2001 From: sostler Date: Sun, 6 Dec 2009 20:59:00 -0500 Subject: fixed npe' --- src/site.clj | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'src') 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))) -- cgit v1.2.3-70-g09d2