summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJoey Hess2014-11-10 16:27:52 -0400
committerJoey Hess2014-11-10 16:27:52 -0400
commit17d81326ba31213915387a3525a3d4ab5c8222c9 (patch)
treeb9fdfecbc1c136bac0dd5f1d6f08fce40b12a900
parent3145346fb85ba654d11ef1fa9b616c0c1053c0a8 (diff)
parentd8ca671086123878c975e2409f92d1dea1b8301e (diff)
Merge branch 'joeyconfig'
-rw-r--r--src/Propellor/Property/Tor.hs10
1 files changed, 5 insertions, 5 deletions
diff --git a/src/Propellor/Property/Tor.hs b/src/Propellor/Property/Tor.hs
index 47cd83a2..3623e9c3 100644
--- a/src/Propellor/Property/Tor.hs
+++ b/src/Propellor/Property/Tor.hs
@@ -20,11 +20,11 @@ hiddenServiceAvailable :: FilePath -> Int -> Property
hiddenServiceAvailable dir port = hiddenServiceHostName prop
where
prop = "/etc/tor/torrc" `File.containsLines`
- [ "HiddenServiceDir " ++ dir
- , "HiddenServicePort " ++ show port ++ " 127.0.0.1:" ++ show port
- ]
- `describe` "hidden service available"
- `onChange` Service.reloaded "tor"
+ [ "HiddenServiceDir " ++ dir
+ , "HiddenServicePort " ++ show port ++ " 127.0.0.1:" ++ show port
+ ]
+ `describe` "hidden service available"
+ `onChange` Service.reloaded "tor"
hiddenServiceHostName p = adjustProperty p $ \satisfy -> do
r <- satisfy
h <- liftIO $ readFile (dir </> "hostname")