aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorgwern0 <gwern0@gmail.com>2007-12-24 06:46:10 +0100
committergwern0 <gwern0@gmail.com>2007-12-24 06:46:10 +0100
commitc6cb52a0bd9b59b1e5c1440d463bf319e0d8ee5d (patch)
tree51b92a45a5815f6621fa5c64831af13e9b684273
parent7a401da8fa5c0b5f9751c4c7bad25896626f62b0 (diff)
downloadXMonadContrib-c6cb52a0bd9b59b1e5c1440d463bf319e0d8ee5d.tar.gz
XMonadContrib-c6cb52a0bd9b59b1e5c1440d463bf319e0d8ee5d.tar.xz
XMonadContrib-c6cb52a0bd9b59b1e5c1440d463bf319e0d8ee5d.zip
Prompt.hs: mv .xmonad_history into .xmonad/
See my email to mailing list. This will slightly break anyone who upgrades while running and expects to see their prompt history, and leave a stray file, I think, but nothing else, and it'll permanently improve tab-completion, and is tidier. darcs-hash:20071224054610-f7719-a5f5baa1d6aa19206ac0809d81dee70aba2b9d29.gz
-rw-r--r--XMonad/Prompt.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/XMonad/Prompt.hs b/XMonad/Prompt.hs
index c30d003..41ff787 100644
--- a/XMonad/Prompt.hs
+++ b/XMonad/Prompt.hs
@@ -613,7 +613,7 @@ getHistory = do
readHistory :: IO ([History],Handle)
readHistory = do
home <- getEnv "HOME"
- let path = home ++ "/.xmonad_history"
+ let path = home ++ "/.xmonad/history"
f <- fileExist path
if f then do h <- openFile path ReadMode
str <- hGetContents h
@@ -627,7 +627,7 @@ readHistory = do
writeHistory :: [History] -> IO ()
writeHistory hist = do
home <- getEnv "HOME"
- let path = home ++ "/.xmonad_history"
+ let path = home ++ "/.xmonad/history"
catch (writeFile path (show hist)) (\_ -> do putStrLn "error in writing"; return ())
-- $xutils