diff options
| -rw-r--r-- | Plugins/Monitors/Common.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Plugins/Monitors/Common.hs b/Plugins/Monitors/Common.hs index c448a65..d6066d6 100644 --- a/Plugins/Monitors/Common.hs +++ b/Plugins/Monitors/Common.hs @@ -255,8 +255,8 @@ floatToPercent n = stringParser :: Pos -> B.ByteString -> String stringParser (x,y) = B.unpack . li x . B.words . li y . B.lines - where li i l | length l >= i = l !! i - | otherwise = B.empty + where li i l | length l > i = l !! i + | otherwise = B.empty setColor :: String -> Selector (Maybe String) -> Monitor String setColor str s = |