ec05681275
5.8.3-13.1
- fix i386-specifics in %install to arch generic
Tue Mar 02 2004 Elliot Lee <sopwith@redhat.com>
- rebuilt
5.8.3-10
- add perl(:MODULE_COMPAT_*) provides; make sure all of @INC is owned by
perl package
5.8.3-8
- rebuild
5.8.3-7.9.rhl9
- rebuild
5.8.3-7.10.fc1
- rebuild
5.8.3-6
- fix very broken @INC calculations with slightly less broken @INC
calculations (not perfectly handled but the result is correct)
- fix broken -Dsitearch declaration
Fri Feb 13 2004 Elliot Lee <sopwith@redhat.com>
- rebuilt
41 lines
1.5 KiB
Diff
41 lines
1.5 KiB
Diff
--- perl-5.8.3/perl.c.fullinc 2004-02-15 10:39:38.947636711 -0500
|
|
+++ perl-5.8.3/perl.c 2004-02-15 10:40:27.399370941 -0500
|
|
@@ -4163,23 +4163,17 @@
|
|
libdir,
|
|
(int)PERL_REVISION, (int)PERL_VERSION,
|
|
(int)PERL_SUBVERSION, ARCHNAME);
|
|
- if (PerlLIO_stat(SvPVX(subdir), &tmpstatbuf) >= 0 &&
|
|
- S_ISDIR(tmpstatbuf.st_mode))
|
|
- av_push(GvAVn(PL_incgv), newSVsv(subdir));
|
|
+ av_push(GvAVn(PL_incgv), newSVsv(subdir));
|
|
|
|
/* .../version if -d .../version */
|
|
Perl_sv_setpvf(aTHX_ subdir, "%"SVf PERL_ARCH_FMT_PATH, libdir,
|
|
(int)PERL_REVISION, (int)PERL_VERSION,
|
|
(int)PERL_SUBVERSION);
|
|
- if (PerlLIO_stat(SvPVX(subdir), &tmpstatbuf) >= 0 &&
|
|
- S_ISDIR(tmpstatbuf.st_mode))
|
|
- av_push(GvAVn(PL_incgv), newSVsv(subdir));
|
|
+ av_push(GvAVn(PL_incgv), newSVsv(subdir));
|
|
|
|
/* .../archname if -d .../archname */
|
|
Perl_sv_setpvf(aTHX_ subdir, "%"SVf PERL_ARCH_FMT, libdir, ARCHNAME);
|
|
- if (PerlLIO_stat(SvPVX(subdir), &tmpstatbuf) >= 0 &&
|
|
- S_ISDIR(tmpstatbuf.st_mode))
|
|
- av_push(GvAVn(PL_incgv), newSVsv(subdir));
|
|
+ av_push(GvAVn(PL_incgv), newSVsv(subdir));
|
|
}
|
|
|
|
#ifdef PERL_INC_VERSION_LIST
|
|
@@ -4187,9 +4181,7 @@
|
|
for (incver = incverlist; *incver; incver++) {
|
|
/* .../xxx if -d .../xxx */
|
|
Perl_sv_setpvf(aTHX_ subdir, "%"SVf PERL_ARCH_FMT, libdir, *incver);
|
|
- if (PerlLIO_stat(SvPVX(subdir), &tmpstatbuf) >= 0 &&
|
|
- S_ISDIR(tmpstatbuf.st_mode))
|
|
- av_push(GvAVn(PL_incgv), newSVsv(subdir));
|
|
+ av_push(GvAVn(PL_incgv), newSVsv(subdir));
|
|
}
|
|
}
|
|
#endif
|