X-Git-Url: http://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=src%2FConfiguration.hs;h=49213c3f92d786ea2a24703d5780b192b04b997b;hb=da61a6744550e974688d46b23b11f1a842e4da2e;hp=68751d6015784242e7ecdb89fcf2ee568ef383da;hpb=f6cb0ba712e06e52d080b86e9eba6c3585a7514b;p=dead%2Fhtsn.git

diff --git a/src/Configuration.hs b/src/Configuration.hs
index 68751d6..49213c3 100644
--- a/src/Configuration.hs
+++ b/src/Configuration.hs
@@ -13,8 +13,10 @@ import System.Log ( Priority( INFO ) )
 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.
 data Configuration =
   Configuration {
     daemonize        :: Bool,
@@ -40,7 +42,7 @@ instance Default Configuration where
           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,