summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAndrew Cady <d@cryptonomic.net>2022-09-15 22:09:19 -0400
committerAndrew Cady <d@cryptonomic.net>2022-09-15 22:09:19 -0400
commitd62ff0d3a2793e94bc27974b58e9c58277bcd4c2 (patch)
treee9f2a7fcdfedb0baca9e4f9169bd0a14c03b3410
parentb780b57488c5caf277609880f9a6e62f4a38de9b (diff)
tweak output
-rwxr-xr-xcountdown.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/countdown.hs b/countdown.hs
index 1cf7a55..1737598 100755
--- a/countdown.hs
+++ b/countdown.hs
@@ -168,7 +168,7 @@ countdownWidget isSimulated (truncateTime -> t) =
168 (str "\n") 168 (str "\n")
169 <=> 169 <=>
170 (hCenter $ hBox 170 (hCenter $ hBox
171 [ (borderWithLabel (str $ printf "%d" currentYear) 171 [ (borderWithLabel (str $ printf "Countdown %d" currentYear)
172 (str $ printf "%d day%s remain%s\n%s hour%s remain%s\n%s minute%s remain%s\n%s second%s remain%s" 172 (str $ printf "%d day%s remain%s\n%s hour%s remain%s\n%s minute%s remain%s\n%s second%s remain%s"
173 daysLeft 173 daysLeft
174 (pluralize daysLeft) 174 (pluralize daysLeft)