diff --git a/diagnose.cabal b/diagnose.cabal
--- a/diagnose.cabal
+++ b/diagnose.cabal
@@ -5,7 +5,7 @@
 -- see: https://github.com/sol/hpack
 
 name:           diagnose
-version:        2.1.0
+version:        2.1.1
 synopsis:       Beautiful error reporting done easily
 description:    This package provides a simple way of getting beautiful compiler/interpreter errors
                 using a very simple interface for the programmer.
diff --git a/src/Error/Diagnose/Compat/Hints.hs b/src/Error/Diagnose/Compat/Hints.hs
--- a/src/Error/Diagnose/Compat/Hints.hs
+++ b/src/Error/Diagnose/Compat/Hints.hs
@@ -1,11 +1,13 @@
 {-# LANGUAGE MultiParamTypeClasses #-}
 
 module Error.Diagnose.Compat.Hints where
+
+import Error.Diagnose (Note)
     
 -- | A class mapping custom errors of type @e@ with messages of type @msg@.
 class HasHints e msg where
   -- | Defines all the hints associated with a given custom error.
-  hints :: e -> [msg]
+  hints :: e -> [Note msg]
 
 -- this is a sane default for 'Void'
 -- but this can be redefined
diff --git a/src/Error/Diagnose/Compat/Megaparsec.hs b/src/Error/Diagnose/Compat/Megaparsec.hs
--- a/src/Error/Diagnose/Compat/Megaparsec.hs
+++ b/src/Error/Diagnose/Compat/Megaparsec.hs
@@ -42,7 +42,7 @@
   -- | The error message of the diagnostic
   msg ->
   -- | Default hints when trivial errors are reported
-  Maybe [msg] ->
+  Maybe [Note msg] ->
   -- | The bundle to create a diagnostic from
   MP.ParseErrorBundle s e ->
   Diagnostic msg
@@ -68,7 +68,7 @@
           end = second (+ 1) start
        in Position start end sourceName
 
-    errorHints :: MP.ParseError s e -> [msg]
+    errorHints :: MP.ParseError s e -> [Note msg]
     errorHints MP.TrivialError {} = trivialHints
     errorHints (MP.FancyError _ errs) =
       Set.toList errs >>= \case
@@ -84,7 +84,7 @@
   -- | The error message of the diagnostic
   msg ->
   -- | Default hints when trivial errors are reported
-  Maybe [msg] ->
+  Maybe [Note msg] ->
   -- | The bundle to create a diagnostic from
   MP.ParseErrorBundle s e ->
   Diagnostic msg
@@ -99,7 +99,7 @@
   -- | The error message of the diagnostic
   msg ->
   -- | Default hints when trivial errors are reported
-  Maybe [msg] ->
+  Maybe [Note msg] ->
   -- | The bundle to create a diagnostic from
   MP.ParseErrorBundle s e ->
   Diagnostic msg
diff --git a/src/Error/Diagnose/Compat/Parsec.hs b/src/Error/Diagnose/Compat/Parsec.hs
--- a/src/Error/Diagnose/Compat/Parsec.hs
+++ b/src/Error/Diagnose/Compat/Parsec.hs
@@ -40,7 +40,7 @@
   -- | The main error of the diagnostic
   msg ->
   -- | Default hints
-  Maybe [msg] ->
+  Maybe [Note msg] ->
   -- | The 'PE.ParseError' to transform into a 'Diagnostic'
   PE.ParseError ->
   Diagnostic msg
@@ -81,7 +81,7 @@
   -- | The main error message of the diagnostic
   msg ->
   -- | Default hints
-  Maybe [msg] ->
+  Maybe [Note msg] ->
   -- | The 'PE.ParseError' to convert
   PE.ParseError ->
   Diagnostic msg
@@ -96,7 +96,7 @@
   -- | The main error message of the diagnostic
   msg ->
   -- | Default hints
-  Maybe [msg] ->
+  Maybe [Note msg] ->
   -- | The 'PE.ParseError' to convert
   PE.ParseError ->
   Diagnostic msg
diff --git a/src/Error/Diagnose/Report/Internal.hs b/src/Error/Diagnose/Report/Internal.hs
--- a/src/Error/Diagnose/Report/Internal.hs
+++ b/src/Error/Diagnose/Report/Internal.hs
@@ -123,7 +123,7 @@
     Hint msg
 
 #ifdef USE_AESON
-instance ToJSON msg => ToJson (Note msg) where
+instance ToJSON msg => ToJSON (Note msg) where
   toJSON (Note msg) = object [ "note" .= msg ]
   toJSON (Hint msg) = object [ "hint" .= msg ]
 #endif