aboutsummaryrefslogtreecommitdiffstats
path: root/XMonad/Config
diff options
context:
space:
mode:
authorAdam Vogt <vogt.adam@gmail.com>2009-07-05 22:12:05 +0200
committerAdam Vogt <vogt.adam@gmail.com>2009-07-05 22:12:05 +0200
commit595021f9a0b70483a7e26337bab8b2da68cd4757 (patch)
tree3800d5ee909f007a77205f5484a732d12a988675 /XMonad/Config
parent29c6f55759fc8a080c7dddf7094ec0e3a896df39 (diff)
downloadXMonadContrib-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')
-rw-r--r--XMonad/Config/Droundy.hs16
-rw-r--r--XMonad/Config/Gnome.hs2
-rw-r--r--XMonad/Config/Kde.hs2
-rw-r--r--XMonad/Config/Monad.hs2
-rw-r--r--XMonad/Config/Xfce.hs2
5 files changed, 12 insertions, 12 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
diff --git a/XMonad/Config/Gnome.hs b/XMonad/Config/Gnome.hs
index fff0d81..abb73f0 100644
--- a/XMonad/Config/Gnome.hs
+++ b/XMonad/Config/Gnome.hs
@@ -30,7 +30,7 @@ import qualified Data.Map as M
-- > import XMonad.Config.Gnome
-- >
-- > main = xmonad gnomeConfig
---
+--
gnomeConfig = desktopConfig
{ terminal = "gnome-terminal"
diff --git a/XMonad/Config/Kde.hs b/XMonad/Config/Kde.hs
index 3a69f16..374c647 100644
--- a/XMonad/Config/Kde.hs
+++ b/XMonad/Config/Kde.hs
@@ -32,7 +32,7 @@ import qualified Data.Map as M
-- > main = xmonad kdeConfig
--
-- For KDE 4, replace 'kdeConfig' with 'kde4Config'
---
+--
kdeConfig = desktopConfig
{ terminal = "konsole"
diff --git a/XMonad/Config/Monad.hs b/XMonad/Config/Monad.hs
index db29097..4294049 100644
--- a/XMonad/Config/Monad.hs
+++ b/XMonad/Config/Monad.hs
@@ -38,7 +38,7 @@ layout = fromSetGet (\x c -> c { layoutHook = x }) layoutHook
terminal = fromSetGet (\x c -> c { X.terminal = x }) X.terminal
keys = fromSetGet (\x c -> c { X.keys = x }) X.keys
-set :: Accessor (XConfig LayoutList) a -> a -> Config ()
+set :: Accessor (XConfig LayoutList) a -> a -> Config ()
set r x = tell (mkW $ r ^= x)
add r x = tell (mkW (r ^: mappend x))
diff --git a/XMonad/Config/Xfce.hs b/XMonad/Config/Xfce.hs
index 0a77734..0cf4dc8 100644
--- a/XMonad/Config/Xfce.hs
+++ b/XMonad/Config/Xfce.hs
@@ -29,7 +29,7 @@ import qualified Data.Map as M
-- > import XMonad.Config.Xfce
-- >
-- > main = xmonad xfceConfig
---
+--
xfceConfig = desktopConfig
{ terminal = "Terminal"