From d6ccfc04b9c013cfab72826553c00ad72bb645b7 Mon Sep 17 00:00:00 2001
From: Michael Snoyman <michael@snoyman.com>
Date: Mon, 30 Mar 2015 12:15:30 +0300
Subject: [PATCH] Updated raw bundle URL

---
 Handler/BuildPlan.hs | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/Handler/BuildPlan.hs b/Handler/BuildPlan.hs
index 963a182..9f70521 100644
--- a/Handler/BuildPlan.hs
+++ b/Handler/BuildPlan.hs
@@ -65,10 +65,16 @@ 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