diff options
| author | David Barksdale <amatus@amatus.name> | 2015-12-31 08:25:18 -0600 |
|---|---|---|
| committer | David Barksdale <amatus@amatus.name> | 2015-12-31 08:25:18 -0600 |
| commit | 7c966d1f14da7276e7629cad0ac218645328006d (patch) | |
| tree | 277c72f2defd7ea3a1d6e229b9c7dfa119a9d636 /src/app/scoreboard.cljs | |
| parent | 1a9bc49d42cb592f3fb41fae8c6af9b1fe983c41 (diff) | |
Add hints
Diffstat (limited to 'src/app/scoreboard.cljs')
| -rw-r--r-- | src/app/scoreboard.cljs | 11 |
1 files changed, 7 insertions, 4 deletions
diff --git a/src/app/scoreboard.cljs b/src/app/scoreboard.cljs index b58e49e..794a803 100644 --- a/src/app/scoreboard.cljs +++ b/src/app/scoreboard.cljs @@ -56,9 +56,12 @@ (td :text (cell= (:name player))) (td :text score) (loop-tpl :bindings [[owner _name] problems] - (td :text (cell= - (name (get (:scores player) - _name - :unsolved)))))))))))) + (let [solved (cell= (= :solved + (get (:scores player) + _name + :unsolved)))] + (td + :text (cell= + (when solved "\u2713")))))))))))) ;; vim: set expandtab ts=2 sw=2 filetype=clojure : |