Xmonad: Flutue e redimensione as janelas para o seu “tamanho natural”

Question

No xmonad, o comportamento padrão das janelas é que elas são lado a lado. Pode-se mudar isso, se usarmos, por exemplo, xprop | grep WM_CLASS e coloca algo assim:

myManageHook = composeAll
    [ className =? "MPlayer"        --> doFloat
    , className =? "Gimp"           --> doFloat]

Em seguida, as janelas desses programas flutuam e têm um "tamanho natural" (como apareceriam no gnome, por exemplo).

Agora, minha pergunta é a seguinte: é possível fazer isso "na hora"?

Eu posso clicar e arrastar com o mod-button1 pressionado e redimensioná-lo manualmente. No entanto, deve redimensionar automaticamente para o "tamanho natural". O que posso alterar no meu xmonad.hs para conseguir isso?

Outra possibilidade (que seria suficiente para mim) seria ter algum "script inicial", vamos chamá-lo xms: Se eu digitar xms foo o programa foo é iniciado flutuando e suas janelas têm "tamanho natural". / p>     

Answer 1

Para um espaço de trabalho flutuante:

import XMonad.Layout.PerWorkspace
 -- then in layoutHook:
onWorkspace "float" simplestFloat

De xmonad.hs do droog

Há também mais informações no wiki: link