diff options
| author | Joey Hess <joey@kitenet.net> | 2014-03-29 23:45:48 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2014-03-29 23:45:48 -0400 |
| commit | 0ab0216d0b400fae78a6a6916ef9f82ed31dc0fa (patch) | |
| tree | fd006abe430c43d6783482451b6b9626994be160 /Property.hs | |
| parent | 0e1b587442fb78bcbf4886b53b85ab64b45215b0 (diff) | |
configure hostname etc
Diffstat (limited to 'Property.hs')
| -rw-r--r-- | Property.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Property.hs b/Property.hs index 5f1b3e24..349d3fd3 100644 --- a/Property.hs +++ b/Property.hs @@ -60,7 +60,7 @@ ensureProperty' (FileProperty _ f a) = go =<< doesFileExist f then noChange else makeChange $ viaTmp writeFile f (unlines ls') go False = makeChange $ writeFile f (unlines $ a []) -ensureProperty' (CmdProperty _ cmd params) = ifM (boolSystem ("./" ++ cmd) params) +ensureProperty' (CmdProperty _ cmd params) = ifM (boolSystem cmd params) ( return MadeChange , return FailedChange ) |