Signedness issue.

p4raw-id: //depot/perl@18651

diff --git a/ext/MIME/Base64/Base64.xs b/ext/MIME/Base64/Base64.xs
index e421836..da2da50 100644 (file)
--- a/ext/MIME/Base64/Base64.xs
+++ b/ext/MIME/Base64/Base64.xs
@@ -356,7 +356,7 @@ decode_qp(sv)
 
         PREINIT:
        STRLEN len;
-       char *str = (unsigned char*)SvPVbyte(sv, len);
+       char *str = SvPVbyte(sv, len);
        char const* end = str + len;
        char *r;
        char *whitespace = 0;