From fd3d667cdece07cc2c3b44fabc5a86bee9e57716 Mon Sep 17 00:00:00 2001 From: Alexander Kjeldaas Date: Tue, 7 Feb 2017 15:12:47 +0100 Subject: [PATCH] Typo? (#37) --- src/Debug.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Debug.hs b/src/Debug.hs index 647549b11..5e62b884d 100644 --- a/src/Debug.hs +++ b/src/Debug.hs @@ -54,7 +54,7 @@ traceShowM a = trace (P.show a) (return ()) traceM :: (Monad m) => Text -> m () traceM s = trace (unpack s) (return ()) -{-# WARNING traceId "'traceM' remains in code" #-} +{-# WARNING traceId "'traceId' remains in code" #-} traceId :: Text -> Text traceId s = trace s s