Change 14539 by jhi@alpha on 2002/02/03 18:32:31
Debug noise.
Affected files ...
.... //depot/perl/ext/Encode/Encode.xs#44 edit
Differences ...
==== //depot/perl/ext/Encode/Encode.xs#44 (text) ====
Index: perl/ext/Encode/Encode.xs
--- perl/ext/Encode/Encode.xs.~1~ Sun Feb 3 11:45:05 2002
+++ perl/ext/Encode/Encode.xs Sun Feb 3 11:45:05 2002
@@ -309,7 +309,9 @@
XPUSHs(e->enc);
SvCUR_set(e->bufsv, e->base.ptr - e->base.buf);
SvUTF8_on(e->bufsv);
+#if 0
Perl_warn(aTHX_ "flush %_",e->bufsv);
+#endif
XPUSHs(e->bufsv);
XPUSHs(&PL_sv_yes);
PUTBACK;
End of Patch.