Skip to content
Snippets Groups Projects
Verified Commit f4d6d11b authored by Legy (Beini)'s avatar Legy (Beini)
Browse files

Cleanup some code

parent 1653f73c
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
src/QBar/Blocks/Battery.hs
+ 1
− 1
View file @ f4d6d11b
...@@ -109,7 +109,7 @@ updateBatteryBlock isPlugged bs = updateBlock $ (shortText.~shortText') $ mkBloc ...@@ -109,7 +109,7 @@ updateBatteryBlock isPlugged bs = updateBlock $ (shortText.~shortText') $ mkBloc
overallPercentage = mkText (not isPlugged) (batteryImportance bs) $ batteryIcon <> " " <> (formatFloatN 0 . batteryPercentage $ bs) <> "%" overallPercentage = mkText (not isPlugged) (batteryImportance bs) $ batteryIcon <> " " <> (formatFloatN 0 . batteryPercentage $ bs) <> "%"
optionalOverallEstimate :: BlockText optionalOverallEstimate :: BlockText
optionalOverallEstimate = maybe mempty (\s -> surroundWith normalText " (" ")" s) . batteryEstimateFormated $ bs optionalOverallEstimate = maybe mempty (surroundWith normalText " (" ")") . batteryEstimateFormated $ bs
batteryImportance :: [BatteryState] -> Importance batteryImportance :: [BatteryState] -> Importance
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment