diff --git a/XMonad/Config/Example.hs b/XMonad/Config/Example.hs
index b9a9a941..0d2ff53e 100644
--- a/XMonad/Config/Example.hs
+++ b/XMonad/Config/Example.hs
@@ -68,10 +68,10 @@ myXPConfig = def
 --
 -- Use the `xprop' tool to get the info you need for these matches.
 -- For className, use the second value that xprop gives you.
-myManageHook = composeOne
-  [ className =? "Pidgin" -?> doFloat
-  , className =? "XCalc"  -?> doFloat
-  , className =? "mpv"    -?> doFloat
+myManageHook = composeAll
+  [ className =? "Pidgin" --> doFloat
+  , className =? "XCalc"  --> doFloat
+  , className =? "mpv"    --> doFloat
   ] <+> composeOne
   -- Handle floating windows:
   [ transience            -- move transient windows to their parent