diff --git a/CHANGELOG.md b/CHANGELOG.md index c49d35b..e083ea7 100644 --- a/CHANGELOG.md +++ b/CHANGELOG.md @@ -9,6 +9,7 @@ Breaking changes: New features: Bugfixes: +- Added missing type class instance names for `DataTransferItemKind` (#69 by @ptrfrncsmrph) Other improvements: diff --git a/src/Web/HTML/Event/DataTransfer/DataTransferItem.purs b/src/Web/HTML/Event/DataTransfer/DataTransferItem.purs index f71bc5f..bdd7479 100644 --- a/src/Web/HTML/Event/DataTransfer/DataTransferItem.purs +++ b/src/Web/HTML/Event/DataTransfer/DataTransferItem.purs @@ -18,10 +18,10 @@ import Data.Nullable as Nullable data DataTransferItemKind = Text | File -derive instance Eq DataTransferItemKind -derive instance Ord DataTransferItemKind +derive instance eqDataTransferItemKind :: Eq DataTransferItemKind +derive instance ordDataTransferItemKind :: Ord DataTransferItemKind -instance Show DataTransferItemKind where +instance showDataTransferItemKind :: Show DataTransferItemKind where show = case _ of Text -> "Text" File -> "File"