forked from commercialhaskell/stack
-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathUrls.hs
More file actions
20 lines (17 loc) · 769 Bytes
/
Urls.hs
File metadata and controls
20 lines (17 loc) · 769 Bytes
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
{-# LANGUAGE OverloadedStrings #-}
module Stack.Config.Urls (urlsFromMonoid) where
import Stack.Types.Urls
import Data.Monoid.Extra
urlsFromMonoid :: UrlsMonoid -> Urls
urlsFromMonoid monoid =
Urls
(fromFirst defaultLatestSnapshot $ urlsMonoidLatestSnapshot monoid)
(fromFirst defaultLtsBuildPlans $ urlsMonoidLtsBuildPlans monoid)
(fromFirst defaultNightlyBuildPlans $ urlsMonoidNightlyBuildPlans monoid)
where
defaultLatestSnapshot =
"https://www.stackage.org/download/snapshots.json"
defaultLtsBuildPlans =
"https://raw.githubusercontent.com/fpco/lts-haskell/master/"
defaultNightlyBuildPlans =
"https://raw.githubusercontent.com/fpco/stackage-nightly/master/"