--- a/src/System/Taffybar/Widgets/Graph.hs
+++ b/src/System/Taffybar/Widgets/Graph.hs
@@ -11,12 +11,12 @@
 -- Note: all of the data fed to this widget should be in the range
 -- [0,1].
 module System.Taffybar.Widgets.Graph
-  -- * Types
+  -- Types
   ( GraphHandle
   , GraphConfig(..)
   , GraphDirection(..)
   , GraphStyle(..)
-  -- * Functions
+  -- Functions
   , graphNew
   , graphAddSample
   , defaultGraphConfig
@@ -52,9 +52,9 @@
 -- | The configuration options for the graph.  The padding is the
 -- number of pixels reserved as blank space around the widget in each
 -- direction.
-data GraphConfig = GraphConfig
+data GraphConfig = GraphConfig {
   -- | Number of pixels of padding on each side of the graph widget
-  { graphPadding :: Int
+    graphPadding :: Int
   -- | The background color of the graph (default black)
   , graphBackgroundColor :: (Double, Double, Double)
   -- | The border color drawn around the graph (default gray)
--- a/src/System/Taffybar/Widgets/VerticalBar.hs
+++ b/src/System/Taffybar/Widgets/VerticalBar.hs
@@ -29,8 +29,8 @@
 data BarDirection = HORIZONTAL | VERTICAL
 
 data BarConfig
-  = BarConfig -- | Color of the border drawn around the widget
-     { barBorderColor :: (Double, Double, Double)
+  = BarConfig { -- | Color of the border drawn around the widget
+      barBorderColor :: (Double, Double, Double)
      -- | The background color of the widget
     , barBackgroundColor :: Double -> (Double, Double, Double)
      -- | A function to determine the color of the widget for the current data point
