summaryrefslogtreecommitdiff
path: root/forum/score.ur
diff options
context:
space:
mode:
authorGravatar Benjamin Barenblat <bbaren@mit.edu>2013-05-02 21:21:22 -0400
committerGravatar Benjamin Barenblat <bbaren@mit.edu>2013-05-02 21:21:22 -0400
commite578da5c4f19af7446a48a9d78f45de51383d4ac (patch)
tree5d2b106748fda2c031d2400fc5ce81c2fb69405a /forum/score.ur
parent53a2c4d4a18c2f5903961bce7bc61cf19336157f (diff)
Forum: Add upvote button
Diffstat (limited to 'forum/score.ur')
-rw-r--r--forum/score.ur5
1 files changed, 5 insertions, 0 deletions
diff --git a/forum/score.ur b/forum/score.ur
index 48bbc01..a966a4d 100644
--- a/forum/score.ur
+++ b/forum/score.ur
@@ -15,3 +15,8 @@ val undecided = 0
val inane = -1
fun toInt s = s
+
+fun withUnits s base =
+ show s ^ " " ^ (case s of
+ 1 => base
+ | _ => base ^ "s")