Fixed location of xmonad.conf

This commit is contained in:
Roman Cheplyaka
2008-05-18 20:46:02 +00:00
parent 7a3ff21b89
commit 3cbccce5e8

View File

@@ -471,7 +471,8 @@ baseConfig = defaultConfig{ layoutHook = Layout (layoutHook defaultConfig) }
-- | Core function that attempts to parse @~\/.xmonad\/xmonad.conf@
readConfig :: IO (Maybe (XConfig Layout))
readConfig = do
cs <- bracket (openFile "/home/braden/.xmonad/xmonad.conf" ReadMode)
dir <- getXMonadDir
cs <- bracket (openFile (dir++"/xmonad.conf") ReadMode)
(\h -> hClose h) -- vv force the lazy IO
(\h -> (lines `fmap` hGetContents h) >>= \ss ->
length ss `seq` return ss)