summaryrefslogtreecommitdiff
path: root/Propellor/Property
diff options
context:
space:
mode:
authorJoey Hess2014-04-01 23:49:15 -0400
committerJoey Hess2014-04-01 23:49:15 -0400
commit3fae22e95b939bc8f05bbd624b8a03ea542fc345 (patch)
tree9273d74d8f8e6eab8b5fe5d4f5454e5f8815bd52 /Propellor/Property
parenta200bcd85a0d2b89ed0dea67dfe693f03ddac7e7 (diff)
changed Arch to String type
Diffstat (limited to 'Propellor/Property')
-rw-r--r--Propellor/Property/SiteSpecific/GitAnnexBuilder.hs4
1 files changed, 1 insertions, 3 deletions
diff --git a/Propellor/Property/SiteSpecific/GitAnnexBuilder.hs b/Propellor/Property/SiteSpecific/GitAnnexBuilder.hs
index cf30ba36..8fcfbd6a 100644
--- a/Propellor/Property/SiteSpecific/GitAnnexBuilder.hs
+++ b/Propellor/Property/SiteSpecific/GitAnnexBuilder.hs
@@ -6,8 +6,6 @@ import qualified Propellor.Property.User as User
import qualified Propellor.Property.Cron as Cron
import Propellor.Property.Cron (CronTimes)
-import Data.Char
-
builduser :: UserName
builduser = "builder"
@@ -26,7 +24,7 @@ builder arch crontimes = combineProperties "gitannexbuilder"
, check (lacksdir builddir) $ userScriptProperty builduser
[ "git clone git://git.kitenet.net/gitannexbuilder " ++ builddir
, "cd " ++ builddir
- , "git checkout " ++ map toLower (show arch)
+ , "git checkout " ++ arch
]
`describe` "gitbuilder setup"
, check (lacksdir $ builddir </> "build") $ userScriptProperty builduser