dougm 2002/05/31 08:41:40
Modified: xs/APR/PerlIO apr_perlio.c
Log:
seek is ok if both perl and apr have largefiles enabled
Revision Changes Path
1.14 +1 -1 modperl-2.0/xs/APR/PerlIO/apr_perlio.c
Index: apr_perlio.c
===================================================================
RCS file: /home/cvs/modperl-2.0/xs/APR/PerlIO/apr_perlio.c,v
retrieving revision 1.13
retrieving revision 1.14
diff -u -r1.13 -r1.14
--- apr_perlio.c 31 May 2002 02:20:29 -0000 1.13
+++ apr_perlio.c 31 May 2002 15:41:40 -0000 1.14
@@ -152,7 +152,7 @@
IV code;
apr_off_t seek_offset = 0;
-#ifdef USE_LARGE_FILES
+#if MP_LARGE_FILES_PERL_ONLY
if (offset != 0) {
Perl_croak(aTHX_ "PerlIO::APR::seek with non-zero offset"
" not supported with -Duselargefiles");