diff --git a/src/QBar/Core.hs b/src/QBar/Core.hs
index d08f655a578aaaf30d80286cd651e4f44767f0c4..be15381c8ca215ccb739e86917c8dc7a8e9a4d18 100644
--- a/src/QBar/Core.hs
+++ b/src/QBar/Core.hs
@@ -200,9 +200,9 @@ sharedInterval barUpdateChannel seconds = do
                 clickAction = Just (updateClickHandler blockOutput)
               }
               if success
-                -- store new BlockProducer back into MVar
+                -- Store new BlockProducer back into MVar
                 then return (pullBlockProducer blockProducer', True)
-                -- mailbox is closed, stop running producer
+                -- Mailbox is sealed, stop running producer
                 else return (PullBlockProducer $ return (), False)
         where
           updateClickHandler :: BlockOutput -> Click -> IO ()