Permalink
Browse files

Sod - missed an instance!

  • Loading branch information...
1 parent 7d4a015 commit 14a9f3109f4d41116160c527ed7acc604d503afa @bos bos committed Jun 1, 2011
Showing with 3 additions and 2 deletions.
  1. +3 −2 Database/MySQL/Simple/Param.hs
@@ -90,8 +90,9 @@ instance Param (Binary SB.ByteString) where
fromChar '\''
instance Param (Binary LB.ByteString) where
- render (Binary bs) = Plain $ fromByteString "0x" `mappend`
- fromLazyByteString (L16.encode bs)
+ render (Binary bs) = Plain $ fromByteString "x'" `mappend`
+ fromLazyByteString (L16.encode bs) `mappend`
+ fromChar '\''
renderNull :: Action
renderNull = Plain (fromByteString "null")

0 comments on commit 14a9f31

Please sign in to comment.