From cd1a9113143606d7d69acef1c74bd852e315334c Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?F=C3=A9lix=20Sipma?= Date: Thu, 13 Nov 2014 09:49:13 +0100 Subject: [PATCH] Tor: change unlines to unwords in hiddenService MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Signed-off-by: Félix Sipma --- src/Propellor/Property/Tor.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/Propellor/Property/Tor.hs b/src/Propellor/Property/Tor.hs index 0747d3d..7a4e915 100644 --- a/src/Propellor/Property/Tor.hs +++ b/src/Propellor/Property/Tor.hs @@ -38,10 +38,10 @@ hiddenServiceAvailable hn port = hiddenServiceHostName prop hiddenService :: HiddenServiceName -> Int -> Property hiddenService hn port = mainConfig `File.containsLines` - [ unlines ["HiddenServiceDir", varLib hn] - , unlines ["HiddenServicePort", show port, "127.0.0.1:" ++ show port] + [ unwords ["HiddenServiceDir", varLib hn] + , unwords ["HiddenServicePort", show port, "127.0.0.1:" ++ show port] ] - `describe` unlines ["hidden service available:", hn, show port] + `describe` unwords ["hidden service available:", hn, show port] `onChange` restarted hiddenServiceData :: HiddenServiceName -> Context -> Property