diff --git a/XMonad/Hooks/StatusBar/PP.hs b/XMonad/Hooks/StatusBar/PP.hs
index 78c3045d41..1a172f4b9a 100644
--- a/XMonad/Hooks/StatusBar/PP.hs
+++ b/XMonad/Hooks/StatusBar/PP.hs
@@ -465,7 +465,7 @@ xmobarStrip = converge (xmobarStripTags ["fc","icon","action"])
 
 converge :: (Eq a) => (a -> a) -> a -> a
 converge f a
-  = fst . NE.head . notEmpty -- *If* this function terminates, we will find a match.
+  = fst . NE.head . notEmpty -- If this function terminates, we will find a match.
   . dropWhile (uncurry (/=))
   . zip xs
   $ drop 1 xs