Portability | unportable |
---|---|
Stability | unstable |
Maintainer | <l.mai@web.de> |
Dynamically apply and unapply transformers to your window layout. This can be used to rotate your window layout by 90 degrees, or to make the currently focused window occupy the whole screen ("zoom in") then undo the transformation ("zoom out").
- class (Eq t, Typeable t) => Transformer t a | t -> a where
- transform :: LayoutClass l a => t -> l a -> (forall l'. LayoutClass l' a => l' a -> b) -> b
- data Toggle a = forall t . Transformer t a => Toggle t
- (??) :: HList b w => a -> b -> HCons a b
- data EOT = EOT
- single :: a -> HCons a EOT
- mkToggle :: LayoutClass l a => ts -> l a -> MultiToggle ts l a
- mkToggle1 :: LayoutClass l a => t -> l a -> MultiToggle (HCons t EOT) l a
Usage
The basic idea is to have a base layout and a set of layout transformers, of which at most one is active at any time. Enabling another transformer first disables any currently active transformer; i.e. it works like a group of radio buttons.
A side effect of this meta-layout is that layout transformers no longer receive any messages; any message not handled by MultiToggle itself will undo the current layout transformer, pass the message on to the base layout, then reapply the transformer.
To use this module, you need some data types which represent transformers; for some commonly used transformers (including MIRROR, NOBORDERS, and FULL used in the examples below) you can simply import XMonad.Layout.MultiToggle.Instances.
Somewhere else in your file you probably have a definition of layout
;
the default looks like this:
layout = tiled ||| Mirror tiled ||| Full
After changing this to
layout = mkToggle (single MIRROR) (tiled ||| Full)
you can now dynamically apply the XMonad.Layout.Mirror
transformation:
... , ((modm, xK_x ), sendMessage $ Toggle MIRROR) ...
(That should be part of your key bindings.) When you press mod-x
, the
active layout is mirrored. Another mod-x
and it's back to normal.
It's also possible to stack MultiToggle
s. For example:
layout = id .XMonad.Layout.NoBorders.smartBorders
. mkToggle (NOBORDERS ?? FULL ?? EOT) . mkToggle (single MIRROR) $ tiled |||XMonad.Layout.Grid.Grid
|||XMonad.Layout.Circle.Circle
By binding a key to (sendMessage $ Toggle FULL)
you can temporarily
maximize windows, in addition to being able to rotate layouts and remove
window borders.
You can also define your own transformers by creating a data type
which is an instance of the Transformer
class. For example, here
is the definition of MIRROR
:
data MIRROR = MIRROR deriving (Read, Show, Eq, Typeable) instance Transformer MIRROR Window where transform _ x k = k (Mirror x)
Note, you need to put {-# LANGUAGE DeriveDataTypeable #-}
at the
beginning of your file.
class (Eq t, Typeable t) => Transformer t a | t -> a whereSource
A class to identify custom transformers (and look up transforming functions by type).
transform :: LayoutClass l a => t -> l a -> (forall l'. LayoutClass l' a => l' a -> b) -> bSource
Toggle the specified layout transformer.
forall t . Transformer t a => Toggle t |
(??) :: HList b w => a -> b -> HCons a bSource
Prepend an element to a heterogeneous list. Used to build transformer
tables for mkToggle
.
mkToggle :: LayoutClass l a => ts -> l a -> MultiToggle ts l aSource
Construct a MultiToggle
layout from a transformer table and a base
layout.
mkToggle1 :: LayoutClass l a => t -> l a -> MultiToggle (HCons t EOT) l aSource
Construct a MultiToggle
layout from a single transformer and a base
layout.