Copyright | (c) 2007 Andrea Rossato |
---|---|
License | BSD-style (see xmonad/LICENSE) |
Maintainer | andrea.rossato@unibz.it |
Stability | unstable |
Portability | unportable |
Safe Haskell | None |
Language | Haskell98 |
A layout modifier for decorating windows in a dwm like style.
Synopsis
- dwmStyle :: (Eq a, Shrinker s) => s -> Theme -> l a -> ModifiedLayout (Decoration DwmStyle s) l a
- data Theme = Theme {
- activeColor :: String
- inactiveColor :: String
- urgentColor :: String
- activeBorderColor :: String
- inactiveBorderColor :: String
- urgentBorderColor :: String
- activeBorderWidth :: Dimension
- inactiveBorderWidth :: Dimension
- urgentBorderWidth :: Dimension
- activeTextColor :: String
- inactiveTextColor :: String
- urgentTextColor :: String
- fontName :: String
- decoWidth :: Dimension
- decoHeight :: Dimension
- windowTitleAddons :: [(String, Align)]
- windowTitleIcons :: [([[Bool]], Placement)]
- def :: Default a => a
- data DwmStyle a = Dwm
- shrinkText :: DefaultShrinker
- data CustomShrink = CustomShrink
- class (Read s, Show s) => Shrinker s where
Usage:
You can use this module with the following in your
~/.xmonad/xmonad.hs
:
import XMonad.Layout.DwmStyle
Then edit your layoutHook
by adding the DwmStyle decoration to
your layout:
myL = dwmStyle shrinkText def (layoutHook def) main = xmonad def { layoutHook = myL }
For more detailed instructions on editing the layoutHook see:
You can also edit the default configuration options.
myDWConfig = def { inactiveBorderColor = "red" , inactiveTextColor = "red"}
and
myL = dwmStyle shrinkText myDWConfig (layoutHook def)
A complete xmonad.hs file for this would therefore be:
import XMonad import XMonad.Layout.DwmStyle main = xmonad def { layoutHook = dwmStyle shrinkText def (layoutHook def) }
dwmStyle :: (Eq a, Shrinker s) => s -> Theme -> l a -> ModifiedLayout (Decoration DwmStyle s) l a Source #
Add simple old dwm-style decorations to windows of a layout.
A Theme
is a record of colors, font etc., to customize a
DecorationStyle
.
For a collection of Theme
s see XMonad.Util.Themes
Theme | |
|
Instances
Eq a => DecorationStyle DwmStyle a Source # | |
Defined in XMonad.Layout.DwmStyle describeDeco :: DwmStyle a -> String Source # shrink :: DwmStyle a -> Rectangle -> Rectangle -> Rectangle Source # decorationEventHook :: DwmStyle a -> DecorationState -> Event -> X () Source # decorationCatchClicksHook :: DwmStyle a -> Window -> Int -> Int -> X Bool Source # decorationWhileDraggingHook :: DwmStyle a -> CInt -> CInt -> (Window, Rectangle) -> Position -> Position -> X () Source # decorationAfterDraggingHook :: DwmStyle a -> (Window, Rectangle) -> Window -> X () Source # pureDecoration :: DwmStyle a -> Dimension -> Dimension -> Rectangle -> Stack a -> [(a, Rectangle)] -> (a, Rectangle) -> Maybe Rectangle Source # decorate :: DwmStyle a -> Dimension -> Dimension -> Rectangle -> Stack a -> [(a, Rectangle)] -> (a, Rectangle) -> X (Maybe Rectangle) Source # | |
Read (DwmStyle a) Source # | |
Show (DwmStyle a) Source # | |
data CustomShrink Source #
Instances
Read CustomShrink Source # | |
Defined in XMonad.Layout.Decoration readsPrec :: Int -> ReadS CustomShrink # readList :: ReadS [CustomShrink] # | |
Show CustomShrink Source # | |
Defined in XMonad.Layout.Decoration showsPrec :: Int -> CustomShrink -> ShowS # show :: CustomShrink -> String # showList :: [CustomShrink] -> ShowS # | |
Shrinker CustomShrink Source # | |
Defined in XMonad.Config.Droundy |
class (Read s, Show s) => Shrinker s where Source #
Instances
Shrinker DefaultShrinker Source # | |
Defined in XMonad.Layout.Decoration | |
Shrinker CustomShrink Source # | |
Defined in XMonad.Config.Droundy |