From 937b55549b4ba72b0392d7e139e592a40eec2101 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Thu, 27 Apr 2017 09:39:55 -0400 Subject: rename LogMessage to AnyMessage Not related to the Log anymore. --- Role/Downloader.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Role/Downloader.hs') diff --git a/Role/Downloader.hs b/Role/Downloader.hs index 243410b..d49b4ec 100644 --- a/Role/Downloader.hs +++ b/Role/Downloader.hs @@ -13,7 +13,7 @@ import Data.Time.Clock.POSIX run :: DownloadOpts -> IO () run = run' downloader . downloadUrl -downloader :: TMChan (Message Entered) -> TMChan LogMessage -> SessionID -> IO () +downloader :: TMChan (Message Entered) -> TMChan AnyMessage -> SessionID -> IO () downloader _ichan ochan sid = do let logfile = sessionLogFile "." sid putStrLn $ "Starting download to " ++ logfile -- cgit v1.2.3