diff options
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 |