diff --git a/src/QBar/Core.hs b/src/QBar/Core.hs
index d66a8dcf1c2c8e2154686d1c97e2df3ee7de9828..e483ff3832539a5a4c46f682482e4920bc6a9462 100644
--- a/src/QBar/Core.hs
+++ b/src/QBar/Core.hs
@@ -129,7 +129,7 @@ hasEventHandler (Just (_, Just _)) = True
 hasEventHandler _ = False
 
 invalidateBlockState :: BlockState -> BlockState
-invalidateBlockState = (_Just . _1) %~ invalidateBlock
+invalidateBlockState = ((_Just . _2) .~ Nothing) . ((_Just . _1) %~ invalidateBlock)
 
 
 runBarIO :: MonadIO m => Bar -> BarIO r -> m r