X-Git-Url: http://gitweb.michael.orlitzky.com/?p=dead%2Fhtsn.git;a=blobdiff_plain;f=src%2FOptionalConfiguration.hs;h=de2e97d892c31af6ab4e630118df94af7f1f099c;hp=f636a17e2d623104dc2b06ea4983a9ff09c81d74;hb=49c23c133221c9686dde0d52d06904db8d048724;hpb=0b1b4dc983422e7bebf1ec2a23632bd16368689f

diff --git a/src/OptionalConfiguration.hs b/src/OptionalConfiguration.hs
index f636a17..de2e97d 100644
--- a/src/OptionalConfiguration.hs
+++ b/src/OptionalConfiguration.hs
@@ -26,7 +26,7 @@ import System.Directory (getHomeDirectory)
 import System.FilePath ( (</>) )
 import System.IO.Error (catchIOError)
 
-import Terminal (report_error)
+import Logging (log_error)
 import TSN.FeedHosts (FeedHosts(..))
 
 
@@ -101,7 +101,7 @@ from_rc = do
   -- not serve much purpose. It could also be a security risk (visible
   -- password) if the admin screws up.
   home <- catchIOError getHomeDirectory (\e -> do
-                                           report_error (show e)
+                                           log_error (show e)
                                            return "$(HOME)")
   let user_config_path = home </> ".htsnrc"
   cfg <- DC.load [ DC.Optional user_config_path ]