Re: [xmonad] Only floating windows with window decoration

2 Oct 2009

      Hi,

I think it is not 100% clear what I mean (or I am really missing
something).

I know how do add a floating layout and I also know how to put a window
into floating.

What I want is, that as soon as I put a window into floating, a window
decoration is added to it and as soons as I remove a window from
floating, the window decaration is removed.

On Fri, Oct 02, 2009 at 09:49:51AM -0400, Andrew Antle wrote:
...
On Fri, Oct 02, 2009 at 08:29:18AM +0200, Nathan Huesken wrote:
...
On Thu, Oct 01, 2009 at 06:06:45PM -0400, Andrew Antle wrote:
...
On Thu, Oct 01, 2009 at 09:51:36PM +0200, Nathan Huesken wrote:
...
Can I somehow configure xmonad, so that only floating windows have
window decoaration? By this I mean a titlebar, which can be used to drag
them around ...
I'd take a look at XMonadContrib/XMonad/Layout/SimpleFloat.hs
I can not find what I want on that page. Can you give me another hint?
Hi Nathan,
Do you have the source tree for XMonadContrib[1]? In the SimpleFloat.hs
file there is a good example from Andrea on how to add that layout to your
xmonad.hs:
----
-- $usage
-- You can use this module with the following in your
-- @~\/.xmonad\/xmonad.hs@:
--
-- > import XMonad.Layout.SimpleFloat
--
-- Then edit your @layoutHook@ by adding the SimpleFloat layout:
--
-- > myLayouts = simpleFloat ||| Full ||| etc..
-- > main = xmonad defaultConfig { layoutHook = myLayouts }
--
-- For more detailed instructions on editing the layoutHook see:
--
-- "XMonad.Doc.Extending#Editing_the_layout_hook"
-- | A simple floating layout where every window is placed according
-- to the window's initial attributes.
--
-- This version is decorated with the 'SimpleDecoration' style.
----
Or you can just specify which applications you want to float, then drag
or resize them via *Mod+Left-Click* or *Mod+Right-Click* respectively:
----
manageHook' :: ManageHook
manageHook' = manageDocks <+> customManageHook
                          <+> manageHook defaultConfig
...
customManageHook = composeAll
    [ className =? "Gimp"       --> doFloat
    , className =? "VirtualBox" --> doFloat
    ]
...
main = do
       xmonad $ defaultConfig
       { workspaces = workspaces'
       ...
       , manageHook = manageHook'
       }
----
[1] http://hackage.haskell.org/packages/archive/xmonad-contrib/0.8.1/xmonad-cont...
or
darcs get http://code.haskell.org/xmonad
darcs get http://code.haskell.org/XMonadContrib
for devel.
HTH,
-- 
Andrew Antle

http://antlechrist.org
##############################################
## <TMR> : Can't we just agree to disagree? ##
## <TBM> : I disagree!                      ##
## <Aq>  : And you're wrong!                ##
##############################################
_______________________________________________
xmonad mailing list
xmonad@haskell.org
http://www.haskell.org/mailman/listinfo/xmonad
-- 
 _________________________________________ 
/  Sometimes I think the surest sign that \
| intelligent life exists elsewhere in    |
| the universe is that none of it has     |
\ tried to contact us. -- Calvin          /
 ----------------------------------------- 
       \   ,__,
        \  (oo)____
           (__)    )\
              ||--|| *