[xmonad] withIM combination

[Henrique G. Abreu]

If I understood you correctly, I've manage to set what you want.
I found this weird to work with :) anyway, here it is:

import XMonad.Hooks.ManageDocks
import XMonad.Layout.ComboP
import XMonad.Layout.NoBorders
import XMonad.Layout.PerWorkspace
import XMonad.Layout.Tabbed
import XMonad.Layout.TwoPane

layout = avoidStruts $ smartBorders $ onWorkspace "im" imLayout $ tiled
where
    imLayout = combineTwoP (TwoPane inc 0.5) (myIM pidgin) (myIM skype)
(ClassName "Pidgin")
    myIM roaster =  combineTwoP (TwoPane inc 0.13) tiled simpleTabbed
roaster
    tiled = Tall 1 inc 0.5
    pidgin = ClassName "Pidgin" `And` Role "buddy_list"
    skype = ClassName "Skype" `And` Role "MainWindow"
    inc = 0.05

Regards,
Henrique G. Abreu


On Tue, Jan 26, 2010 at 14:45, Alessandro Massignan <ff0000.it at gmail.com>wrote:

> Hi all,
>
> few months ago i give xmonad a chance and I really like it a lot...
> There's only one problem: i'm an ultra-rookie to xmonad and to haskell, so
> i beg for knowledge :-P
> I try to setup a layout suitable for chatting and looking around I found:
>
> * XMonad.Layout.IM
> * XMonad.Layout.LayoutCombinators
>
> what I'm trying to do is to set up a layout that split my screen
> horizontally
> in two sections and LayoutCombinators seems to be the one; each
> section is handled with IM layout.
> I've forgotten to mention that in the upper section i run pidgin and in the
> lower skype, so in each section i want the buddies list on the left and
> each
> opened chat to be "tabbed" on the right.
> Basically i have this:
>
> tabbedLayout = (tabbed shrinkText tabbedTheme)
> commLayout = avoidStruts $
>             (withIM (0.20) pidginRoster tabbedLayout)
>             *//*
>             (withIM (0.20) skypeRoster tabbedLayout)
> pidginRoster = (ClassName "Pidgin") `And`
>              (Role "buddy_list")
> skypeRoster  = (ClassName "Skype") `And`
>               (Not (Title "Options")) `And`
>               (Not (Role "Chats"))    `And`
>               (Not (Role "CallWindowForm"))
>
> ok, it runs but with an essential issue: every chat window is tabbed in the
> upper section, while i want the pidgin chats above and skype chats below.
> Any hints?
>
> Thanks a lot! :-)
> ff0000
> _______________________________________________
> xmonad mailing list
> xmonad at haskell.org
> http://www.haskell.org/mailman/listinfo/xmonad
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://www.haskell.org/pipermail/xmonad/attachments/20100126/aae84c3c/attachment.html