summaryrefslogtreecommitdiff
path: root/src/Data/ByteString/Base32/Hex.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Data/ByteString/Base32/Hex.hs')
-rw-r--r--src/Data/ByteString/Base32/Hex.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Data/ByteString/Base32/Hex.hs b/src/Data/ByteString/Base32/Hex.hs
index c38c2da..d866570 100644
--- a/src/Data/ByteString/Base32/Hex.hs
+++ b/src/Data/ByteString/Base32/Hex.hs
@@ -55,10 +55,10 @@ decTable = BS.pack $ L.map decW5 [minBound .. maxBound]
55 55
56-- | Decode a base32hex encoded bytestring. This functions is 56-- | Decode a base32hex encoded bytestring. This functions is
57-- case-insensitive and do not requires correct padding. 57-- case-insensitive and do not requires correct padding.
58decode :: Base32Hex -> ByteString 58decode :: Base32Hex -> Either String ByteString
59decode = pack5 decTable 59decode = pack5 decTable
60 60
61-- | The same as 'decode' but with additional leniency: decodeLenient 61-- | The same as 'decode' but with additional leniency: decodeLenient
62-- will skip non-alphabet characters. 62-- will skip non-alphabet characters.
63decodeLenient :: Base32Hex -> ByteString 63decodeLenient :: Base32Hex -> Either String ByteString
64decodeLenient = pack5Lenient decTable \ No newline at end of file 64decodeLenient = pack5Lenient decTable \ No newline at end of file