import qualified OptionalConfiguration as OC (
OptionalConfiguration(..),
merge_maybes )
-import TSN.FeedHosts (FeedHosts(..))
+import FeedHosts (FeedHosts(..))
-- | The main configuration data type. This will be passed to most of
-- the important functions once it has been created.
log_level = INFO,
output_directory = ".",
password = def,
- pidfile = "/run/htsn.pid",
+ pidfile = "/run/htsn/htsn.pid",
run_as_group = def,
run_as_user = def,
syslog = def,
username = def }
--- | Merge a Configuration with an OptionalConfiguration. This is more
--- or less the Monoid instance for OptionalConfiguration, but since
--- the two types are different, we have to repeat ourselves.
+-- | Merge a 'Configuration' with an 'OptionalConfiguration'. This is
+-- more or less the Monoid instance for 'OptionalConfiguration', but
+-- since the two types are different, we have to repeat ourselves.
merge_optional :: Configuration
-> OC.OptionalConfiguration
-> Configuration