import XMonad import XMonad.Hooks.DynamicLog import XMonad.Hooks.ManageDocks import XMonad.Hooks.ManageHelpers import XMonad.Layout.NoBorders import XMonad.Layout.Gaps import XMonad.Util.Run(spawnPipe) import XMonad.Util.EZConfig(additionalKeys) import System.IO --This file should NOT be a .txt, it should be an .hs! Remove the .txt then remove this line, K? main = do xmproc <- spawnPipe "/usr/bin/xmobar /home/jade/.xmobarrc" xmonad defaultConfig { terminal = "gnome-terminal", -- if you are using xmonad 0.9, you can avoid web flash videos getting cropped in fullscreen like so: -- manageHook = ( isFullscreen --> doFullFloat ) <+> manageDocks <+> manageHook defaultConfig, -- (no longer needed in 0.10) manageHook = manageDocks <+> manageHook defaultConfig, layoutHook = avoidStruts $ layoutHook defaultConfig, logHook = dynamicLogWithPP $ xmobarPP { ppOutput = hPutStrLn xmproc, ppTitle = xmobarColor "yellow" "" . shorten 50 } }