From 9e8cc307442338461ce7513db73ea0994095a43f Mon Sep 17 00:00:00 2001 From: Mahdi Dibaiee Date: Wed, 22 Feb 2017 12:56:32 +0330 Subject: [PATCH] fix: port is string --- src/System/Serverman/Actions/Nginx.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/System/Serverman/Actions/Nginx.hs b/src/System/Serverman/Actions/Nginx.hs index cbcfcfc..66163bd 100644 --- a/src/System/Serverman/Actions/Nginx.hs +++ b/src/System/Serverman/Actions/Nginx.hs @@ -19,7 +19,7 @@ module System.Serverman.Actions.Nginx (nginx) where nginx params@(ServerParams { ssl, serverService, domain, directory, serverType }) = do -- Turn SSL off at first, because we have not yet received a certificate - let content = show (params { ssl = False, port = 80 }) + let content = show (params { ssl = False, port = "80" }) parent = configDirectory serverService "configs" path = parent domain targetDir = directory