diff options
-rw-r--r-- | src/Data/ByteString/Base32.hs | 2 | ||||
-rw-r--r-- | src/Data/ByteString/Base32/Hex.hs | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/src/Data/ByteString/Base32.hs b/src/Data/ByteString/Base32.hs index 89d6e2c..f35210f 100644 --- a/src/Data/ByteString/Base32.hs +++ b/src/Data/ByteString/Base32.hs | |||
@@ -77,5 +77,5 @@ decW5Lenient = decCharLenient . w2c | |||
77 | 77 | ||
78 | -- TODO padding leniency | 78 | -- TODO padding leniency |
79 | -- | Case-insensitive counterpart of the 'decode'. | 79 | -- | Case-insensitive counterpart of the 'decode'. |
80 | decodeLenient :: ByteString -> ByteString | 80 | decodeLenient :: Base32 -> ByteString |
81 | decodeLenient = id -- pack5 nullPtr decW5Lenient \ No newline at end of file | 81 | decodeLenient = id -- pack5 nullPtr decW5Lenient \ No newline at end of file |
diff --git a/src/Data/ByteString/Base32/Hex.hs b/src/Data/ByteString/Base32/Hex.hs index 0708eeb..24655b7 100644 --- a/src/Data/ByteString/Base32/Hex.hs +++ b/src/Data/ByteString/Base32/Hex.hs | |||
@@ -56,5 +56,5 @@ decTable = BS.pack $ L.map decW5 [minBound .. maxBound] | |||
56 | decode :: Base32Hex -> ByteString | 56 | decode :: Base32Hex -> ByteString |
57 | decode = pack5 decTable | 57 | decode = pack5 decTable |
58 | 58 | ||
59 | decodeLenient :: ByteString -> ByteString | 59 | decodeLenient :: Base32Hex -> ByteString |
60 | decodeLenient = id \ No newline at end of file | 60 | decodeLenient = id \ No newline at end of file |