From e8188ea611e4c9223492203c0ec0370c3c45b225 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Mon, 17 Sep 2012 00:18:07 -0400 Subject: flip catchDefaultIO --- Locations/UserConfig.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Locations') diff --git a/Locations/UserConfig.hs b/Locations/UserConfig.hs index 5da58eb9f..3a6a27e91 100644 --- a/Locations/UserConfig.hs +++ b/Locations/UserConfig.hs @@ -28,4 +28,4 @@ programFile = userConfigFile "program" readProgramFile :: IO FilePath readProgramFile = do programfile <- programFile - catchDefaultIO (readFile programfile) "git-annex" + catchDefaultIO "git-annex" $ readFile programfile -- cgit v1.2.3