diff options
| -rw-r--r-- | XMonad/Actions/CopyWindow.hs | 11 |
1 files changed, 8 insertions, 3 deletions
diff --git a/XMonad/Actions/CopyWindow.hs b/XMonad/Actions/CopyWindow.hs index 17b5821..ac530da 100644 --- a/XMonad/Actions/CopyWindow.hs +++ b/XMonad/Actions/CopyWindow.hs @@ -39,9 +39,14 @@ import XMonad.StackSet -- > -- mod-[1..9] @@ Switch to workspace N -- > -- mod-shift-[1..9] @@ Move client to workspace N -- > -- mod-control-shift-[1..9] @@ Copy client to workspace N --- > [((m .|. modMask x, k), f i) --- > | (i, k) <- zip workspaces [xK_1 ..] --- > , (f, m) <- [(view, 0), (shift, shiftMask), (copy, shiftMask .|. controlMask)]] +-- > [((m .|. modMask x, k), windows $ f i) +-- > | (i, k) <- zip (workspaces x) [xK_1 ..] +-- > , (f, m) <- [(W.view, 0), (W.shift, shiftMask), (copy, shiftMask .|. controlMask)]] +-- +-- To use the above key bindings you need also to import +-- "XMonad.StackSet": +-- +-- > import qualified XMonad.StackSet as W -- -- You may also wish to redefine the binding to kill a window so it only -- removes it from the current workspace, if it's present elsewhere: |