import Text.Read ( readMaybe )
import Backend ( Backend(..) )
+import ConnectionString ( ConnectionString )
import Network.Services.TSN.Report ( report_error )
data OptionalConfiguration =
OptionalConfiguration {
backend :: Maybe Backend,
- connection_string :: Maybe String,
+ connection_string :: Maybe ConnectionString,
log_file :: Maybe FilePath,
log_level :: Maybe Priority,
syslog :: Maybe Bool,