From fc7da17ff6bc98792c45910076d4f9eb298dbfb0 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Jan=20Hamal=20Dvo=C5=99=C3=A1k?= <mordae@anilinux.org>
Date: Thu, 23 Apr 2020 01:20:47 +0200
Subject: [PATCH] Make sure no parameter is a list
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

Signed-off-by: Jan Hamal Dvořák <mordae@anilinux.org>
---
 lib/Hikaru/Types.hs | 8 --------
 1 file changed, 8 deletions(-)

diff --git a/lib/Hikaru/Types.hs b/lib/Hikaru/Types.hs
index dfa9d36..7f26f12 100644
--- a/lib/Hikaru/Types.hs
+++ b/lib/Hikaru/Types.hs
@@ -114,10 +114,6 @@ where
                       _else -> Nothing
     {-# INLINE fromParam #-}
 
-  instance FromParam String where
-    fromParam = Just . unpack
-    {-# INLINE fromParam #-}
-
   instance FromParam Text where
     fromParam = Just . id
     {-# INLINE fromParam #-}
@@ -213,10 +209,6 @@ where
     toParam char = pack [char]
     {-# INLINE toParam #-}
 
-  instance ToParam String where
-    toParam = pack
-    {-# INLINE toParam #-}
-
   instance ToParam Text where
     toParam = id
     {-# INLINE toParam #-}
-- 
GitLab