diff options
author | Joey Hess <joeyh@joeyh.name> | 2017-04-30 14:09:07 -0400 |
---|---|---|
committer | Joey Hess <joeyh@joeyh.name> | 2017-04-30 14:09:07 -0400 |
commit | 44a0ef97a39c679fc4cb6cb9aa1ae28ba724e1e7 (patch) | |
tree | 8315b7eecd17e9a2e53fff070133148e8a8d9640 /Role | |
parent | a7c767c914d860e3176fdeacb5d00e4fc25c17d1 (diff) | |
download | debug-me-44a0ef97a39c679fc4cb6cb9aa1ae28ba724e1e7.tar.gz |
improve
Diffstat (limited to 'Role')
-rw-r--r-- | Role/Downloader.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/Role/Downloader.hs b/Role/Downloader.hs index d013344..d969df8 100644 --- a/Role/Downloader.hs +++ b/Role/Downloader.hs @@ -23,6 +23,7 @@ downloader dsv _ichan ochan sid = do sk <- genMySessionKey (st, _startoutput) <- processSessionStart sk ochan logger dsv go logger st + putStrLn $ "Finished download to " ++ logfile where go logger st = do ts <- getPOSIXTime |