- Just 80 -> Just ""
- Just n -> Just $ ':' : show n
- Nothing -> Nothing
- case portStr of
- Just str -> updateAuthority host (C8.pack str)
- -- FIXME: このエラーの原因は、listen してゐるソ
- -- ケットが INET でない故にポート番號が分からな
- -- い事だが、その事をどうにかして通知した方が良
- -- いと思ふ。stderr?
- Nothing -> setStatus InternalServerError