diff --git a/config/xmonad/xmonad.hs b/config/xmonad/xmonad.hs
index 729a550a..c40a7798 100644
--- a/config/xmonad/xmonad.hs
+++ b/config/xmonad/xmonad.hs
@@ -252,7 +252,7 @@ myLogHook :: Handle -> X ()
 myLogHook h = dynamicLogWithPP $ def { 
                                     ppOutput = hPutStrLn h,
                                     ppExtras = [],
-                                    ppOrder = \(ws:_) -> [ws]
+                                    ppOrder = \[ws, l, _] -> [ws, l],
                                   }
 
 myXmobarFormat = def {
@@ -263,7 +263,7 @@ myXmobarFormat = def {
             ppHiddenNoWindows = lowWhite . wrap " " "",
             ppUrgent = red . wrap (yellow "!") (yellow "!"),
             -- ppOrder = \(ws:_) -> [ws],
-            ppOrder = \[ws, l, _] -> [ws, l],
+            ppOrder = \[ws, l, _, wins] -> [ws, l, wins]
             ppExtras = [logTitles formatFocused formatUnfocused]
 }
   where