diff options
| author | Adam Vogt <vogt.adam@gmail.com> | 2009-07-05 22:12:05 +0200 |
|---|---|---|
| committer | Adam Vogt <vogt.adam@gmail.com> | 2009-07-05 22:12:05 +0200 |
| commit | 595021f9a0b70483a7e26337bab8b2da68cd4757 (patch) | |
| tree | 3800d5ee909f007a77205f5484a732d12a988675 /XMonad/Config/Droundy.hs | |
| parent | 29c6f55759fc8a080c7dddf7094ec0e3a896df39 (diff) | |
| download | XMonadContrib-595021f9a0b70483a7e26337bab8b2da68cd4757.tar.gz XMonadContrib-595021f9a0b70483a7e26337bab8b2da68cd4757.tar.xz XMonadContrib-595021f9a0b70483a7e26337bab8b2da68cd4757.zip | |
Remove trailing whitespace from many modules
Ignore-this: 1e28ff0974578d329bd3d593c1a5125e
darcs-hash:20090705201205-1499c-581bd0bb43ab6096eccded6edbd54a7a2007b0d9.gz
Diffstat (limited to 'XMonad/Config/Droundy.hs')
| -rw-r--r-- | XMonad/Config/Droundy.hs | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/XMonad/Config/Droundy.hs b/XMonad/Config/Droundy.hs index 6f63688..0f324c1 100644 --- a/XMonad/Config/Droundy.hs +++ b/XMonad/Config/Droundy.hs @@ -95,7 +95,7 @@ keys x = M.fromList $ , ((modMask x .|. controlMask .|. shiftMask, xK_Left), sendMessage $ Move L) , ((modMask x .|. controlMask .|. shiftMask, xK_Up), sendMessage $ Move U) , ((modMask x .|. controlMask .|. shiftMask, xK_Down), sendMessage $ Move D) - + , ((0, xK_F2 ), spawn "gnome-terminal") -- %! Launch gnome-terminal , ((0, xK_F3 ), shellPrompt myXPConfig) -- %! Launch program , ((0, xK_F11 ), spawn "ksnapshot") -- %! Take snapshot @@ -112,7 +112,7 @@ keys x = M.fromList $ , ((modMask x, xK_space), sendMessage Toggle) ] - + ++ zip (zip (repeat $ modMask x) [xK_F1..xK_F12]) (map (withNthWorkspace W.greedyView) [0..]) ++ @@ -143,12 +143,12 @@ config = defaultConfig mytab = tabbed CustomShrink defaultTheme instance Shrinker CustomShrink where - shrinkIt shr s | Just s' <- dropFromHead " " s = shrinkIt shr s' - shrinkIt shr s | Just s' <- dropFromTail " " s = shrinkIt shr s' - shrinkIt shr s | Just s' <- dropFromTail "- Iceweasel" s = shrinkIt shr s' - shrinkIt shr s | Just s' <- dropFromTail "- KPDF" s = shrinkIt shr s' - shrinkIt shr s | Just s' <- dropFromHead "file://" s = shrinkIt shr s' - shrinkIt shr s | Just s' <- dropFromHead "http://" s = shrinkIt shr s' + shrinkIt shr s | Just s' <- dropFromHead " " s = shrinkIt shr s' + shrinkIt shr s | Just s' <- dropFromTail " " s = shrinkIt shr s' + shrinkIt shr s | Just s' <- dropFromTail "- Iceweasel" s = shrinkIt shr s' + shrinkIt shr s | Just s' <- dropFromTail "- KPDF" s = shrinkIt shr s' + shrinkIt shr s | Just s' <- dropFromHead "file://" s = shrinkIt shr s' + shrinkIt shr s | Just s' <- dropFromHead "http://" s = shrinkIt shr s' shrinkIt _ s | n > 9 = s : map cut [2..(halfn-3)] ++ shrinkIt shrinkText s where n = length s halfn = n `div` 2 |