From 4589fe7915a52ab216897782aea378b07076b61f Mon Sep 17 00:00:00 2001 From: Gregor Kleen Date: Wed, 15 Jul 2015 22:31:21 +0200 Subject: Proper type for hScreenPerm --- .xmonad/xmonad.hs | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/.xmonad/xmonad.hs b/.xmonad/xmonad.hs index 569d428..287247d 100644 --- a/.xmonad/xmonad.hs +++ b/.xmonad/xmonad.hs @@ -86,9 +86,11 @@ hostFromName h@("vali") = defaultHost { hName = h ] hWsp = wspFromMap workspaceNames hCoWsp = coWspFromMap workspaceNames - hScreenPerm 1 = 2 - hScreenPerm 2 = 1 - hScreenPerm x = x + hScreenPerm = map hPrim + where + hPrim 1 = 2 + hPrim 2 = 1 + hPrim x = x hostFromName _ = defaultHost wspFromMap workspaceNames = \i -> case Map.lookup i workspaceNames of -- cgit v1.2.3