[xmonad] Looking to deploy xmonad to ~20 employees

[Joachim Breitner]

Hi,

Am Montag, den 14.01.2013, 10:15 +0100 schrieb Thomas Løcke:
> On Sun, Jan 13, 2013 at 3:56 PM, Joachim Breitner
> <mail at joachim-breitner.de> wrote:
>         I assume you are using XMonad.Hooks.ManageDocks and
>         avoidStruts to make
>         things avoid xmobar? In that case, try "sendMessage
>         ToggleStruts" to see
>         if that yields the behavior you want, i.e. the VirtualBox
>         window _above_
>         xmobar.
>         
>         I guess it is possible to enable avoidStruts only on some
>         workspaces,
>         probably with XMonad.Layout.PerWorkspace – I have not used
>         that.

> I do use "sendMessage ToggleStruts" in my own xmonad.hs to toggle
> xmobar on/off, but I've
> no idea how to A. make it affect only a specific workspace and B.
> automatically call it when
> xmonad is started.

Untested Code: If your current layout looks like this:
	layoutHook = avoidStruts (tall ||| mirror tall ||| ...)
then change it to
	layoutHook = let common = (tall ||| mirror tall ||| ...)
		     in onWorkspace "1" common (avoidStruts common)

Greetings,
Joachim



-- 
Joachim Breitner
  e-Mail: mail at joachim-breitner.de
  Homepage: http://www.joachim-breitner.de
  Jabber-ID: nomeata at joachim-breitner.de
-------------- next part --------------
A non-text attachment was scrubbed...
Name: not available
Type: application/pgp-signature
Size: 198 bytes
Desc: This is a digitally signed message part
URL: <http://www.haskell.org/pipermail/xmonad/attachments/20130114/34503c73/attachment.pgp>