diff options
author | Spencer Janssen <sjanssen@cse.unl.edu> | 2007-11-01 21:10:59 +0100 |
---|---|---|
committer | Spencer Janssen <sjanssen@cse.unl.edu> | 2007-11-01 21:10:59 +0100 |
commit | 4866f2e367dfcf22a9591231ba40948826a1b438 (patch) | |
tree | 7a245caee3f146826b267d773b7eaa80386a818e /DeManage.hs | |
parent | 47589e1913fb9530481caedb543978a30d4323ea (diff) | |
download | XMonadContrib-4866f2e367dfcf22a9591231ba40948826a1b438.tar.gz XMonadContrib-4866f2e367dfcf22a9591231ba40948826a1b438.tar.xz XMonadContrib-4866f2e367dfcf22a9591231ba40948826a1b438.zip |
Hierarchify
darcs-hash:20071101201059-a5988-fc1f1262bec1b69e13ba18ae7cefeafc8c4471d4.gz
Diffstat (limited to 'DeManage.hs')
-rw-r--r-- | DeManage.hs | 58 |
1 files changed, 0 insertions, 58 deletions
diff --git a/DeManage.hs b/DeManage.hs deleted file mode 100644 index 3994541..0000000 --- a/DeManage.hs +++ /dev/null @@ -1,58 +0,0 @@ ------------------------------------------------------------------------------ --- | --- Module : XMonadContrib.DeManage --- Copyright : (c) Spencer Janssen <sjanssen@cse.unl.edu> --- License : BSD3-style (see LICENSE) --- --- Maintainer : Spencer Janssen <sjanssen@cse.unl.edu> --- Stability : unstable --- Portability : unportable --- --- This module provides a method to cease management of a window, without --- unmapping it. This is especially useful for applications like kicker and --- gnome-panel. --- --- To make a panel display correctly with xmonad: --- --- * Determine the pixel size of the panel, add that value to defaultGaps --- --- * Launch the panel --- --- * Give the panel window focus, then press mod-d --- --- * Convince the panel to move\/resize to the correct location. Changing the --- panel's position setting several times seems to work. --- ------------------------------------------------------------------------------ - -module XMonadContrib.DeManage ( - -- * Usage - -- $usage - demanage - ) where - -import qualified XMonad.StackSet as W -import XMonad -import XMonad.Operations -import Control.Monad.State -import Graphics.X11 (Window) - --- $usage --- To use demanage, add this import: --- --- > import XMonadContrib.DeManage --- --- And add a keybinding to it: --- --- > , ((modMask, xK_d ), withFocused demanage) --- - --- %import XMonadContrib.DeManage --- %keybind , ((modMask, xK_d ), withFocused demanage) - --- | Stop managing the current focused window. -demanage :: Window -> X () -demanage w = do - -- use modify to defeat automatic 'unmanage' calls. - modify (\s -> s { windowset = W.delete w (windowset s) }) - refresh |