summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--app/Sensor.hs5
1 files changed, 3 insertions, 2 deletions
diff --git a/app/Sensor.hs b/app/Sensor.hs
index 84f5b88..d65b556 100644
--- a/app/Sensor.hs
+++ b/app/Sensor.hs
@@ -238,11 +238,12 @@ bat =
| otherwise -> pure (P.pretty "\xf089c")
else
if
+ | value >= 0.95 -> pure (P.pretty "\xf0079")
| value >= 0.9 -> pure (P.pretty "\xf0082")
| value >= 0.8 -> pure (P.pretty "\xf0081")
| value >= 0.7 -> pure (P.pretty "\xf0080")
- | value >= 0.6 -> pure (P.pretty "\xf008f")
- | value >= 0.5 -> pure (P.pretty "\xf008e")
+ | value >= 0.6 -> pure (P.pretty "\xf007f")
+ | value >= 0.5 -> pure (P.pretty "\xf007e")
| value >= 0.4 -> pure (P.pretty "\xf007d")
| value >= 0.3 -> pure (P.pretty "\xf007c")
| value >= 0.2 -> pure (P.pretty "\xf007b")