Skip to content
Snippets Groups Projects
Verified Commit fc7da17f authored by jan.hamal.dvorak's avatar jan.hamal.dvorak
Browse files

Make sure no parameter is a list

parent 754d5234
Branches
No related tags found
No related merge requests found
...@@ -114,10 +114,6 @@ where ...@@ -114,10 +114,6 @@ where
_else -> Nothing _else -> Nothing
{-# INLINE fromParam #-} {-# INLINE fromParam #-}
instance FromParam String where
fromParam = Just . unpack
{-# INLINE fromParam #-}
instance FromParam Text where instance FromParam Text where
fromParam = Just . id fromParam = Just . id
{-# INLINE fromParam #-} {-# INLINE fromParam #-}
...@@ -213,10 +209,6 @@ where ...@@ -213,10 +209,6 @@ where
toParam char = pack [char] toParam char = pack [char]
{-# INLINE toParam #-} {-# INLINE toParam #-}
instance ToParam String where
toParam = pack
{-# INLINE toParam #-}
instance ToParam Text where instance ToParam Text where
toParam = id toParam = id
{-# INLINE toParam #-} {-# INLINE toParam #-}
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment