summaryrefslogtreecommitdiff
path: root/src/Propellor/Property
diff options
context:
space:
mode:
authorJoey Hess2016-03-06 19:00:49 -0400
committerJoey Hess2016-03-06 19:00:49 -0400
commite8f36722bf23a19dcdd42a1c14ebaa40a2d73293 (patch)
tree553cd675d18cb83bfd4e365066827191b6c4e08c /src/Propellor/Property
parent3a9c23d6463c15c1fc5568df4c0ec212c2a84cd7 (diff)
parent463418726ad8d8b80b5f0aae302c18c1516774f8 (diff)
Merge branch 'joeyconfig'
Diffstat (limited to 'src/Propellor/Property')
-rw-r--r--src/Propellor/Property/File.hs6
1 files changed, 1 insertions, 5 deletions
diff --git a/src/Propellor/Property/File.hs b/src/Propellor/Property/File.hs
index e3732c9f..3021617c 100644
--- a/src/Propellor/Property/File.hs
+++ b/src/Propellor/Property/File.hs
@@ -92,11 +92,7 @@ fileProperty' writer desc a f = property desc $ go =<< liftIO (doesFileExist f)
let new = unlines (a (lines old))
if old == new
then noChange
- else makeChange $ do
- writeFile "/tmp/a" old
- writeFile "/tmp/b" new
- print ("MAKE CHANGE", f)
- updatefile new `viaStableTmp` f
+ else makeChange $ updatefile new `viaStableTmp` f
go False = makeChange $ writer f (unlines $ a [])
-- Replicate the original file's owner and mode.