sha1Lazy :: L.ByteString -> Text
sha1Lazy bytes = pack $ unpack (hashlazy bytes) >>= printf "%02x"
sha1Lazy :: L.ByteString -> Text
sha1Lazy bytes = pack $ unpack (hashlazy bytes) >>= printf "%02x"
sha1Lazy bytes = pack $ unpack (hashlazy bytes) >>= printf "%02x"