From 42e4145a170a12f557fbe58344bb115061452d2a Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Sun, 22 Apr 2012 01:20:17 -0400 Subject: bugfixes --- Config.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'Config.hs') diff --git a/Config.hs b/Config.hs index 065ee48f3..3feb246e5 100644 --- a/Config.hs +++ b/Config.hs @@ -101,7 +101,7 @@ getDiskReserve = fromMaybe megabyte . readSize dataUnits - splitting it into lines. -} getHttpHeaders :: Annex [String] getHttpHeaders = do - cmd <- getConfig "annex.httpheaders-command" "" + cmd <- getConfig "annex.http-headers-command" "" if (null cmd) - then fromRepo $ Git.Config.getList "annex.httpheaders" + then fromRepo $ Git.Config.getList "annex.http-headers" else lines . snd <$> liftIO (pipeFrom "sh" ["-c", cmd]) -- cgit v1.2.3