diff options
| author | Joris Guyonvarch | 2015-04-14 00:16:21 +0200 |
|---|---|---|
| committer | Joris Guyonvarch | 2015-04-14 00:20:20 +0200 |
| commit | 280f030f652da4abb60c89845f5739ef2e3823bc (patch) | |
| tree | 00b83c223d9e6026f97e3a226d41c14202a6dd1d /src | |
| parent | d3dd0e129658e3617f9e6e4fa0910cb15c42520d (diff) | |
| download | ad-listener-280f030f652da4abb60c89845f5739ef2e3823bc.tar.gz ad-listener-280f030f652da4abb60c89845f5739ef2e3823bc.tar.bz2 ad-listener-280f030f652da4abb60c89845f5739ef2e3823bc.zip | |
Fixing compilation
Diffstat (limited to 'src')
| -rw-r--r-- | src/AdListener.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/AdListener.hs b/src/AdListener.hs index da3051d..04e070b 100644 --- a/src/AdListener.hs +++ b/src/AdListener.hs @@ -80,7 +80,7 @@ trySendMail config message = eitherMailSuccess <- sendMail mailTo message case eitherMailSuccess of Right () -> - return "Mail sent." + putStrLn "Mail sent." Left error -> T.putStrLn . T.concat $ [ "Error sending mail: " |