diff options
| author | Joey Hess <joeyh@joeyh.name> | 2015-11-11 15:11:09 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2015-11-11 15:11:09 -0400 |
| commit | edf12c8643f2d7eef439efe36265ca9be6838938 (patch) | |
| tree | 1631f85ca1d2077d8e511dda3bb11fe5fcc4a0a3 /src/Propellor/Property/PropellorRepo.hs | |
| parent | f4ba7abb3a81629d70d0e051226aaee4ab765458 (diff) | |
rename for clarity
Diffstat (limited to 'src/Propellor/Property/PropellorRepo.hs')
| -rw-r--r-- | src/Propellor/Property/PropellorRepo.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Propellor/Property/PropellorRepo.hs b/src/Propellor/Property/PropellorRepo.hs index 20c13df1..d4c4abe5 100644 --- a/src/Propellor/Property/PropellorRepo.hs +++ b/src/Propellor/Property/PropellorRepo.hs @@ -11,8 +11,8 @@ import Propellor.Git -- -- This property is useful when hosts are being updated without using -- --spin, eg when using the `Propellor.Property.Cron.runPropellor` cron job. -hasUrl :: String -> Property NoInfo -hasUrl u = property ("propellor repo url " ++ u) $ do +hasOriginUrl :: String -> Property NoInfo +hasOriginUrl u = property ("propellor repo url " ++ u) $ do curru <- liftIO getRepoUrl if curru == Just u then return NoChange |