sandi 0.3.5 → 0.3.6

raw patch · 3 files changed

+6/−2 lines, 3 files

Files

csrc/codec.c +2/−1
sandi.cabal +1/−1
test-src/Codec/Binary/QuotedPrintableTest.hs +3/−0

csrc/codec.c view

@@ -1179,7 +1179,8 @@     int res = 0;      for(i = 0, *dstlen = 0; i < srclen && *dstlen < od; i++, (*dstlen)++) {-        if((33 <= src[i] && src[i] <= 60) ||+        if((9 == src[i]) ||+            (32 <= src[i] && src[i] <= 60) ||             (62 <= src[i] && src[i] <= 126)) {             dst[*dstlen] = src[i];         } else if('=' == src[i]) {

sandi.cabal view

@@ -1,5 +1,5 @@ name: sandi-version: 0.3.5+version: 0.3.6 license: BSD3 license-file: LICENSE cabal-version: >= 1.8

test-src/Codec/Binary/QuotedPrintableTest.hs view

@@ -20,11 +20,14 @@ case_enc_foobar = do     BS.empty          @=? QP.encode BS.empty     BSC.pack "foobar" @=? QP.encode (BSC.pack "foobar")+    BSC.pack "foo=20bar" @=? QP.encode (BSC.pack "foo bar")  case_dec_foobar :: IO () case_dec_foobar = do     Right BS.empty            @=? QP.decode BS.empty     Right (BSC.pack "foobar") @=? QP.decode (BSC.pack "foobar")+    Right (BSC.pack "foo bar") @=? QP.decode (BSC.pack "foo bar")+    Right (BSC.pack "foo bar") @=? QP.decode (BSC.pack "foo=20bar")  prop_encdec :: [Word8] -> Bool prop_encdec ws = (BS.pack ws) == (fromRight $ QP.decode $ QP.encode $ BS.pack ws)