Les vidéos flash en fulls­creen avec Xmonad

Honte à moi, il m’ar­rive d’uti­li­ser cette cochon­ne­rie de flash ! Mea Culpa !

Mais bon, tant qu’à utili­ser un truc sale, autant le faire dans le confort. Et jusqu’à aujourd’­hui, je n’ar­ri­vais pas à mettre les vidéo en flash d’Ice­wea­sel en fulls­creen.

Mais main­te­nant, j’ai la solu­tion, et je tiens à la parta­ger pour plusieurs raisons :

  • J’ai eu du mal à la trou­ver et à la mettre en œuvre : j’es­père que ça évitera à d’autres de longues heures de recherche déses­pé­rée sur le net
  • Je ne tiens pas à lais­ser un fichier de confi­gu­ra­tion qui marche à moitié
  • Je ne veux pas dégoû­ter ceux qui ont testé Xmonad à cause de mon article dessus

Donc, les manips à faire. Ouvrez votre .xmonad/xmonad.hs et écri­vez :

import Monad.Hooks.Mana­geHel­pers

dans le gros bloc de import du début de fichier.

Ensuite insé­rez :

, [ maybeToDe­fi­nite (isFulls­creen -?> doFullF­loat) ]

dans la défi­ni­tion de myMa­na­geHook, ce qui ressemble chez moi à : 

myMa­na­geHook = compo­seAll . concat $
            [—The appli­ca­tions that float
              [ className =? i—> doFloat               | i <- myClassF­loats]
             —The appli­ca­tions to ignore
            , [ className =? j—> doIgnore              | j <- myClassI­gnore]
            , [ title =? k—> doIgnore                  | k <- myTit­leI­gnore]
            , [ maybeToDe­fi­nite (isFulls­creen -?> doFullF­loat) ]
            ]

Voilà, redé­mar­rez Icewea­sel pour faire vos tests, ça devrait aller !