From: Nicholas Clark Date: Mon, 16 Feb 2009 21:42:54 +0000 (+0000) Subject: Abolish PERL_AV_SUFFIX_FMT, which was rendered obsolescent 8 years ago with X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e50b42d3b9d4d5466150b00299d8145beabd33df;p=p5sagit%2Fp5-mst-13.2.git Abolish PERL_AV_SUFFIX_FMT, which was rendered obsolescent 8 years ago with 084592ab0b76f3cbd4d089afb08ccea7ba1c9dd8. --- diff --git a/perl.c b/perl.c index 76cee05..e9a4018 100644 --- a/perl.c +++ b/perl.c @@ -4462,13 +4462,11 @@ S_incpush(pTHX_ const char *const dir, STRLEN len, U32 flags) #endif if (addsubdirs) { #ifdef MACOS_TRADITIONAL -#define PERL_AV_SUFFIX_FMT "" #define PERL_ARCH_FMT "%s:" -#define PERL_ARCH_FMT_PATH PERL_FS_VER_FMT PERL_AV_SUFFIX_FMT +#define PERL_ARCH_FMT_PATH PERL_FS_VER_FMT "" #else -#define PERL_AV_SUFFIX_FMT "/" #define PERL_ARCH_FMT "/%s" -#define PERL_ARCH_FMT_PATH PERL_AV_SUFFIX_FMT PERL_FS_VER_FMT +#define PERL_ARCH_FMT_PATH "/" PERL_FS_VER_FMT #endif /* .../version/archname if -d .../version/archname */ Perl_sv_setpvf(aTHX_ subdir, "%"SVf PERL_ARCH_FMT_PATH PERL_ARCH_FMT,