"eps com estem" <[EMAIL PROTECTED]> writes:
> my $info = {};
> $upload->slurp($info->{eii});
> $info->{eii} contains nothing.
>
> This is the same that happened in $r->read function, that was fixed
> two seconds after :)
Here's a patch for $upload->slurp, see if it helps:
Index: glue/perl/xsbuilder/Apache/Upload/Apache__Upload.h
===================================================================
--- glue/perl/xsbuilder/Apache/Upload/Apache__Upload.h (revision 112718)
+++ glue/perl/xsbuilder/Apache/Upload/Apache__Upload.h (working copy)
@@ -283,6 +283,7 @@
data[len_size] = 0;
SvCUR_set(ST(1), len_size);
SvPOK_only(ST(1));
+ SvSETMAGIC(ST(1));
s = apr_brigade_flatten(bb, data, &len_size);
if (s != APR_SUCCESS) {
APREQ_XS_THROW_ERROR(upload, s, "Apache::Upload::slurp",
--
Joe Schaefer
--
Report problems: http://perl.apache.org/bugs/
Mail list info: http://perl.apache.org/maillist/modperl.html
List etiquette: http://perl.apache.org/maillist/email-etiquette.html
