From dd375bbbc1f8a3f603a06d1f7d5016198b37c2ae Mon Sep 17 00:00:00 2001 From: Michael Snoyman Date: Mon, 30 Mar 2015 13:21:13 +0300 Subject: [PATCH] Revert "Updated raw bundle URL" This reverts commit d6ccfc04b9c013cfab72826553c00ad72bb645b7. --- Handler/BuildPlan.hs | 6 ------ 1 file changed, 6 deletions(-) diff --git a/Handler/BuildPlan.hs b/Handler/BuildPlan.hs index 9f70521..963a182 100644 --- a/Handler/BuildPlan.hs +++ b/Handler/BuildPlan.hs @@ -65,16 +65,10 @@ download :: HttpM env m -> m () download ltsVer dest = do req <- parseUrl $ unpack $ concat - {- [ "https://raw.githubusercontent.com/fpco/lts-haskell/master/lts-" , ltsVer , ".yaml" ] - -} - [ "https://cdn.rawgit.com/fpco/lts-haskell/master/lts-" - , ltsVer - , "1.14.yaml" - ] withResponse req $ \res -> liftIO $ F.withFile dest F.WriteMode $ \h -> responseBody res $$ sinkHandle h