summaryrefslogtreecommitdiff
path: root/Propellor
diff options
context:
space:
mode:
authorJoey Hess2014-04-14 14:43:04 -0400
committerJoey Hess2014-04-14 14:43:04 -0400
commit6808fe60e1ad7593455d477ff456d8dbfbe75331 (patch)
tree67978d6bb8d8718fff79f220dc239e97b6202642 /Propellor
parentfc8d3fe541ab019ac545695fc829af9558c8b1ed (diff)
propellor spin
Diffstat (limited to 'Propellor')
-rw-r--r--Propellor/Property/SiteSpecific/JoeySites.hs9
1 files changed, 5 insertions, 4 deletions
diff --git a/Propellor/Property/SiteSpecific/JoeySites.hs b/Propellor/Property/SiteSpecific/JoeySites.hs
index f409b09b..5a2e1644 100644
--- a/Propellor/Property/SiteSpecific/JoeySites.hs
+++ b/Propellor/Property/SiteSpecific/JoeySites.hs
@@ -192,10 +192,11 @@ annexRsyncServer = combineProperties "rsync server for git-annex autobuilders"
twitRss :: Property
twitRss = combineProperties "twitter rss"
[ Git.cloned "joey" "git://git.kitenet.net/twitrss.git" dir Nothing
- , check (doesFileExist $ dir </> "twitRss") $ userScriptProperty "joey"
- [ "cd " ++ dir
- , "ghc --make twitRss"
- ]
+ , check (not <$> doesFileExist (dir </> "twitRss")) $
+ userScriptProperty "joey"
+ [ "cd " ++ dir
+ , "ghc --make twitRss"
+ ]
]
where
dir = "/srv/web/tmp.kitenet.net/twitrss"