diff options
Diffstat (limited to 'Session.hs')
-rw-r--r-- | Session.hs | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -8,10 +8,10 @@ import System.Exit import Data.Monoid startSession :: B.ByteString -startSession = ">>> debug-me session started" +startSession = "** debug-me session started" endSession :: ExitCode -> B.ByteString -endSession ec = ">>> debug-me session ended (" <> B8.pack (show n) <> ")" +endSession ec = "** debug-me session ended (" <> B8.pack (show n) <> ")" where n = case ec of ExitSuccess -> 0 |