Permalink
Browse files

fix type nit for putStrSz

  • Loading branch information...
1 parent 7882383 commit e329747c1a46196a55e6d141f26b8a2434f5ce14 @srp committed Apr 16, 2010
Showing with 1 addition and 1 deletion.
  1. +1 −1 Database/MongoDB/Util.hs
@@ -79,5 +79,5 @@ putNull = putI8 0
putS :: L8.ByteString -> Put
putS s = putLazyByteString s >> putNull
-putStrSz :: L.ByteString -> Put
+putStrSz :: L8.ByteString -> Put
putStrSz s = putI32 (fromIntegral $ 1 + L.length s) >> putS s

0 comments on commit e329747

Please sign in to comment.