fix(ssl): port is 443 not 403 :|

This commit is contained in:
Mahdi Dibaiee 2017-02-22 14:05:28 +03:30
parent c4cc227935
commit f32a8e2bb4

View File

@ -87,7 +87,7 @@ module System.Term ( initialize ) where
let portNumber let portNumber
| (not . null) port = port | (not . null) port = port
| ssl = "403" | ssl = "433"
| otherwise = "80" | otherwise = "80"
absoluteDirectory <- makeAbsolute directory absoluteDirectory <- makeAbsolute directory