diff options
| author | Scott Ostler <sostler@deathmachine.local> | 2010-02-25 20:15:53 -0500 |
|---|---|---|
| committer | Scott Ostler <sostler@deathmachine.local> | 2010-02-25 20:15:53 -0500 |
| commit | 4bb4fbe6f3abc01edcd402edd1f2c86bd690c062 (patch) | |
| tree | 3baca3b0b0459f597693437e9fda004b580c84cc /src | |
| parent | 3c0aa312a9cb6dce05ec20b93191700e17b1a170 (diff) | |
Rearranged profile func
Diffstat (limited to 'src')
| -rwxr-xr-x | src/site.clj | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/src/site.clj b/src/site.clj index 48ba39e..cd2b82f 100755 --- a/src/site.clj +++ b/src/site.clj @@ -318,15 +318,16 @@ dump-offset (* offset *dumps-per-page*) dumps (fetch-messages-by-nick profile-nick true dump-offset) dump-count (count-messages-by-nick profile-nick true) - st (fetch-template "profile" session)] + st (fetch-template "profile" session) + dumps (to-array (map process-message-for-output dumps))] (do (.setAttribute st "is_home" is-home) (doseq [a [:nick :avatar :contact :bio]] (let [v (user-info a)] (.setAttribute st (name a) (if (non-empty-string? v) (escape-html v))))) - (.setAttribute st "dumps" - (to-array (map process-message-for-output dumps))) + (if (> (count dumps) 0) + (.setAttribute st "dumps" dumps)) (if (< (+ dump-offset *dumps-per-page*) dump-count) (.setAttribute st "next" (inc offset))) (if (not= offset 0) |
