Copyright | (c) José A. Romero L. |
---|---|
License | BSD3-style (see LICENSE) |
Maintainer | José A. Romero L. <escherdragon@gmail.com> |
Stability | unstable |
Portability | unportable |
Safe Haskell | None |
Language | Haskell2010 |
Simple text widget that shows the XMonad layout used in the currently
active workspace, and that allows to change it by clicking with the
mouse: left-click to switch to the next layout in the list, right-click
to switch to the first one (as configured in xmonad.hs
)
- newtype LayoutConfig = LayoutConfig {
- formatLayout :: String -> TaffyIO String
- defaultLayoutConfig :: LayoutConfig
- layoutNew :: LayoutConfig -> TaffyIO Widget
Usage
This widget requires that the System.Taffybar.Support.PagerHints hook be
installed in your xmonad.hs
:
import System.Taffybar.Support.PagerHints (pagerHints) main = do xmonad $ ewmh $ pagerHints $ defaultConfig ...
Once you've properly configured xmonad.hs
, you can use the widget in
your taffybar.hs
file:
import System.Taffybar.Widget.Layout main = do let los = layoutSwitcherNew defaultLayoutConfig
now you can use los
as any other Taffybar widget.
newtype LayoutConfig Source #
layoutNew :: LayoutConfig -> TaffyIO Widget Source #
Create a new Layout widget that will use the given Pager as its source of events.