summaryrefslogtreecommitdiff
path: root/src/Propellor/Property/Tor.hs
diff options
context:
space:
mode:
authorJoey Hess2014-11-10 16:27:36 -0400
committerJoey Hess2014-11-10 16:27:36 -0400
commitd8ca671086123878c975e2409f92d1dea1b8301e (patch)
tree92247e339b68227cc02b67aeefab90257619c6c3 /src/Propellor/Property/Tor.hs
parent929d26d556a4fbeb58723e451c7bf1e3887bb9d6 (diff)
didn't need quite so much indentation
Diffstat (limited to 'src/Propellor/Property/Tor.hs')
-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")