diff --git a/src/QBar/BlockOutput.hs b/src/QBar/BlockOutput.hs
index b3756738fac568abd98f32474bbe568eb3bba58a..1f06099ecfcd89847ae47b73a90e2e0c25b0844b 100644
--- a/src/QBar/BlockOutput.hs
+++ b/src/QBar/BlockOutput.hs
@@ -51,12 +51,12 @@ $(deriveJSON defaultOptions ''BlockText)
 
 
 mkBlockOutput :: BlockText -> BlockOutput
-mkBlockOutput text = BlockOutput
-  { _fullText = text
-  , _shortText = Nothing
-  , _blockName = Nothing
-  , _invalid = False
-  }
+mkBlockOutput text = BlockOutput {
+  _fullText = text,
+  _shortText = Nothing,
+  _blockName = Nothing,
+  _invalid = False
+}
 
 mkErrorOutput :: T.Text -> BlockOutput
 mkErrorOutput = mkBlockOutput . importantText criticalImportant
@@ -68,8 +68,6 @@ addIcon :: T.Text -> BlockOutput -> BlockOutput
 addIcon icon = over fullText $ (<>) . normalText $ icon <> " "
 
 
-
-
 normalImportant :: Importance
 normalImportant = 1
 warnImportant :: Importance