thereadme/serverman
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

fix: missing semicolon

Browse Source
This commit is contained in:
Mahdi Dibaiee 2017-02-22 13:18:12 +03:30
parent b8fe5c304e
commit 4e423dcff3
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/System/Serverman/Actions/Nginx.hs
View File

@ -77,7 +77,7 @@ module System.Serverman.Actions.Nginx (nginx) where
writeIncludeStatementIfMissing path target = do writeIncludeStatementIfMissing path target = do
content <- readFile path content <- readFile path
let statement = "include " ++ target ++ "/*" let statement = "include " ++ target ++ "/*;"
when (not (statement `isInfixOf` content)) $ do when (not (statement `isInfixOf` content)) $ do
let newContent = appendAfter content "http {" (" " ++ statement) let newContent = appendAfter content "http {" (" " ++ statement)