In perl.git, the branch sprout/rocox has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/6a79a9213fae30748a87599879d70589329f60a2?hp=6d71bec0094bf85d21f58e8047ee2c8b7548f664>

- Log -----------------------------------------------------------------
commit 6a79a9213fae30748a87599879d70589329f60a2
Author: Father Chrysostomos <[email protected]>
Date:   Sat Dec 28 06:08:48 2013 -0800

    Oops. Fix XS::APItest test.
-----------------------------------------------------------------------

Summary of changes:
 ext/XS-APItest/APItest.xs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ext/XS-APItest/APItest.xs b/ext/XS-APItest/APItest.xs
index f2021ce..10c79f8 100644
--- a/ext/XS-APItest/APItest.xs
+++ b/ext/XS-APItest/APItest.xs
@@ -2402,7 +2402,7 @@ utf16_to_utf8 (sv, ...)
        SV *dest;
        I32 got; /* Gah, badly thought out APIs */
     CODE:
-       if (ix) (void)SvPV_force(sv);
+       if (ix) (void)SvPV_force_nolen(sv);
        source = (U8 *)SvPVbyte(sv, len);
        /* Optionally only convert part of the buffer.  */      
        if (items > 1) {

--
Perl5 Master Repository

Reply via email to