Skip to content

Instantly share code, notes, and snippets.

@taktoa

taktoa/xmonad.hs

Last active February 18, 2016 23:44
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save taktoa/a67a10e0f86a2bceb755 to your computer and use it in GitHub Desktop.
Save taktoa/a67a10e0f86a2bceb755 to your computer and use it in GitHub Desktop.
Download ZIP
Fix xfce panel under XMonad
Raw
xmonad.hs
-- ... all of your XMonad imports
import Control.Concurrent (forkIO, threadDelay)
import Control.Monad (void)
main :: IO ()
main = fixPanel >> xmonad myConfig
fixPanel :: IO ()
fixPanel = void $ forkIO $ do
threadDelay 5000000 -- delay for five seconds
spawn "xfce4-panel -r"
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment