diff options
Diffstat (limited to 'XMonad')
| -rw-r--r-- | XMonad/Core.hs | 3 | ||||
| -rw-r--r-- | XMonad/Layout.hs | 5 |
2 files changed, 6 insertions, 2 deletions
diff --git a/XMonad/Core.hs b/XMonad/Core.hs index a6ee797..f31cd74 100644 --- a/XMonad/Core.hs +++ b/XMonad/Core.hs @@ -340,7 +340,8 @@ io = liftIO catchIO :: MonadIO m => IO () -> m () catchIO f = io (f `catch` \e -> hPrint stderr e >> hFlush stderr) --- | spawn. Launch an external application +-- | spawn. Launch an external application. Specifically, it double-forks and +-- runs the 'String' you pass as a command to /bin/sh. spawn :: MonadIO m => String -> m () spawn x = doubleFork $ executeFile "/bin/sh" False ["-c", x] Nothing diff --git a/XMonad/Layout.hs b/XMonad/Layout.hs index 1f73648..2c97a75 100644 --- a/XMonad/Layout.hs +++ b/XMonad/Layout.hs @@ -51,7 +51,10 @@ instance LayoutClass Full a -- | The builtin tiling mode of xmonad. Supports 'Shrink', 'Expand' and -- 'IncMasterN'. -data Tall a = Tall !Int !Rational !Rational deriving (Show, Read) +data Tall a = Tall !Int -- ^ The default number of windows in the master pane (default: 1) + !Rational -- ^ Default proportion of screen occupied by master pane (default: 1/2) + !Rational -- ^ Percent of screen to increment by when resizing panes (default: 3/100) + deriving (Show, Read) -- TODO should be capped [0..1] .. -- a nice pure layout, lots of properties for the layout, and its messages, in Properties.hs |