stas 2004/05/21 11:33:07
Modified: src/modules/perl modperl_bucket.c
Log:
fix offset bug in new()
Revision Changes Path
1.10 +1 -1 modperl-2.0/src/modules/perl/modperl_bucket.c
Index: modperl_bucket.c
===================================================================
RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_bucket.c,v
retrieving revision 1.9
retrieving revision 1.10
diff -u -u -r1.9 -r1.10
--- modperl_bucket.c 4 Mar 2004 06:01:06 -0000 1.9
+++ modperl_bucket.c 21 May 2004 18:33:05 -0000 1.10
@@ -83,7 +83,7 @@
svbucket = (modperl_bucket_sv_t *)malloc(sizeof(*svbucket));
- bucket = apr_bucket_shared_make(bucket, svbucket, offset, offset+len);
+ bucket = apr_bucket_shared_make(bucket, svbucket, offset, len);
/* XXX: need to deal with PerlInterpScope */
#ifdef USE_ITHREADS