MINGW-packages/mingw-w64-perl/001-fhs-directory-structure.patch
2025-07-17 18:23:11 +02:00

518 lines
16 KiB
Diff

--- a/win32/GNUmakefile
+++ b/win32/GNUmakefile
@@ -47,6 +47,7 @@
#
INST_DRV := c:
INST_TOP := $(INST_DRV)\perl
+INST_DOC := $(INST_TOP)
#
# Uncomment if you want to build a 32-bit Perl using a 32-bit compiler
@@ -63,7 +64,15 @@
# versioned installation can be obtained by setting INST_TOP above to a
# path that includes an arbitrary version string.
#
-#INST_VER := \5.38.4
+INST_VER := \5.38.4
+INST_VER_PERL := \perl-5.38.4
+
+INST_SITE_VER := $(INST_VER)
+#INST_VEND_VER := $(INST_VER)
+#INST_CORE_VER := $(INST_VER)
+INST_SITE_VER_PERL := $(INST_VER_PERL)
+#INST_VEND_VER_PERL := $(INST_VER_PERL)
+#INST_CORE_VER_PERL := $(INST_VER_PERL)
#
# Comment this out if you DON'T want your perl installation to have
@@ -543,12 +552,12 @@
# Strip trailing backslash from INST_TOP
override INST_TOP := $(INST_TOP:\=)
-INST_SCRIPT = $(INST_TOP)$(INST_VER)\bin
-INST_BIN = $(INST_SCRIPT)$(INST_ARCH)
-INST_LIB = $(INST_TOP)$(INST_VER)\lib
-INST_ARCHLIB = $(INST_LIB)$(INST_ARCH)
+INST_SCRIPT = $(INST_TOP)\bin\core_perl$(INST_CORE_VER)
+INST_BIN = $(INST_TOP)\bin$(INST_CORE_VER_PERL)$(INST_ARCH)
+INST_LIB = $(INST_TOP)\lib\perl5\core_perl$(INST_CORE_VER)
+INST_ARCHLIB = $(INST_TOP)\lib\perl5\core_perl$(INST_CORE_VER)$(INST_ARCH)
INST_COREDIR = $(INST_ARCHLIB)\CORE
-INST_HTML = $(INST_TOP)$(INST_VER)\html
+INST_HTML = $(INST_DOC)\share\doc\perl5$(INST_CORE_VER)
#
# Programs to compile, build .lib files and link
@@ -1096,8 +1105,15 @@
# -- BKS 10-17-1999
CFG_VARS = \
"INST_TOP=$(INST_TOP)" \
+ "INST_DOC=$(INST_DOC)" \
"INST_VER=$(INST_VER)" \
"INST_ARCH=$(INST_ARCH)" \
+ "INST_SITE_VER=$(INST_SITE_VER)" \
+ "INST_VEND_VER=$(INST_VEND_VER)" \
+ "INST_CORE_VER=$(INST_CORE_VER)" \
+ "INST_SITE_VER_PERL=$(INST_SITE_VER_PERL)" \
+ "INST_VEND_VER_PERL=$(INST_VEND_VER_PERL)" \
+ "INST_CORE_VER_PERL=$(INST_CORE_VER_PERL)" \
"archname=$(ARCHNAME)" \
"cc=$(CC)" \
"ld=$(LINK32)" \
@@ -1660,7 +1676,7 @@
$(MINIPERL) -I..\lib ..\pod\perlmodlib.PL -q ..
..\pod\perltoc.pod: $(PERLEXE) $(PERLDLL) Extensions Extensions_nonxs $(NORMALIZE_DYN) utils
- $(PERLEXE) -f ..\pod\buildtoc -q
+ $(PERLEXE) -I..\lib -Ilib -f ..\pod\buildtoc -q
# Note that the pod cleanup in this next section is parsed (and regenerated
# by pod/buildtoc so please check that script before making changes here
--- a/win32/config.gc
+++ b/win32/config.gc
@@ -22,8 +22,8 @@
api_version='~PERL_API_VERSION~'
api_versionstring='~PERL_API_REVISION~.~PERL_API_VERSION~.~PERL_API_SUBVERSION~'
ar='~ARCHPREFIX~ar'
-archlib='~INST_TOP~~INST_VER~\lib~INST_ARCH~'
-archlibexp='~INST_TOP~~INST_VER~\lib~INST_ARCH~'
+archlib='~INST_TOP~\lib\perl5\core_perl~INST_CORE_VER~~INST_ARCH~'
+archlibexp='~INST_TOP~\lib\perl5\core_perl~INST_CORE_VER~~INST_ARCH~'
archname64=''
archname='MSWin32'
archobjs=''
@@ -31,8 +31,8 @@
awk='awk'
baserev='5'
bash=''
-bin='~INST_TOP~~INST_VER~\bin~INST_ARCH~'
-binexp='~INST_TOP~~INST_VER~\bin~INST_ARCH~'
+bin='~INST_TOP~\bin~INST_CORE_VER_PERL~~INST_ARCH~'
+binexp='~INST_TOP~\bin~INST_CORE_VER_PERL~~INST_ARCH~'
bison=''
bootstrap_charset='undef'
byacc='byacc'
@@ -48,8 +48,8 @@
ccname='~cc~'
ccsymbols=''
ccversion=''
-cf_by='nobody'
-cf_email='nobody@no.where.net'
+cf_by=' '
+cf_email=' '
cf_time=''
charbits='8'
chgrp=''
@@ -618,10 +618,10 @@
d_usleep='undef'
d_usleepproto='undef'
d_ustat='undef'
-d_vendorarch='undef'
-d_vendorbin='undef'
-d_vendorlib='undef'
-d_vendorscript='undef'
+d_vendorarch='define'
+d_vendorbin='define'
+d_vendorlib='define'
+d_vendorscript='define'
d_vfork='undef'
d_void_closedir='undef'
d_voidsig='define'
@@ -724,10 +724,10 @@
h_sysfile='true'
hint='recommended'
hostcat='ypcat hosts'
-html1dir=' '
-html1direxp=''
-html3dir=' '
-html3direxp=''
+html1dir='~INST_DOC~\share\doc\perl5\core_perl~INST_CORE_VER~'
+html1direxp='~INST_DOC~\share\doc\perl5\core_perl~INST_CORE_VER~'
+html3dir='~INST_DOC~\share\doc\perl5\core_perl~INST_CORE_VER~'
+html3direxp='~INST_DOC~\share\doc\perl5\core_perl~INST_CORE_VER~'
i16size='2'
i16type='short'
i32dformat='"ld"'
@@ -822,41 +822,41 @@
i_wctype='undef'
i_xlocale='undef'
ignore_versioned_solibs=''
-inc_version_list=''
+inc_version_list=' '
inc_version_list_init='0'
incpath=''
inews=''
initialinstalllocation=''
-installarchlib='~INST_TOP~~INST_VER~\lib~INST_ARCH~'
-installbin='~INST_TOP~~INST_VER~\bin~INST_ARCH~'
-installhtml1dir=''
-installhtml3dir=''
-installhtmldir='~INST_TOP~~INST_VER~\html'
-installhtmlhelpdir='~INST_TOP~~INST_VER~\htmlhelp'
-installman1dir='~INST_TOP~~INST_VER~\man\man1'
-installman3dir='~INST_TOP~~INST_VER~\man\man3'
-installprefix='~INST_TOP~~INST_VER~'
-installprefixexp='~INST_TOP~~INST_VER~'
-installprivlib='~INST_TOP~~INST_VER~\lib'
-installscript='~INST_TOP~~INST_VER~\bin'
-installsitearch='~INST_TOP~\site~INST_VER~\lib~INST_ARCH~'
-installsitebin='~INST_TOP~~INST_VER~\bin~INST_ARCH~'
-installsitehtml1dir=''
-installsitehtml3dir=''
-installsitelib='~INST_TOP~\site~INST_VER~\lib'
-installsiteman1dir=''
-installsiteman3dir=''
-installsitescript=''
-installstyle='lib'
+installarchlib='~INST_TOP~\lib\perl5\core_perl~INST_CORE_VER~~INST_ARCH~'
+installbin='~INST_TOP~\bin~INST_CORE_VER_PERL~~INST_ARCH~'
+installhtml1dir='~INST_DOC~\share\doc\perl5\core_perl~INST_CORE_VER~'
+installhtml3dir='~INST_DOC~\share\doc\perl5\core_perl~INST_CORE_VER~'
+installhtmldir='~INST_DOC~\share\doc\perl5~INST_CORE_VER~'
+installhtmlhelpdir='~INST_DOC~\share\doc\perl5~INST_CORE_VER~\htmlhelp'
+installman1dir='~INST_DOC~\share\man\man1'
+installman3dir='~INST_DOC~\share\man\man3'
+installprefix='~INST_TOP~'
+installprefixexp='~INST_TOP~'
+installprivlib='~INST_TOP~\lib\perl5\core_perl~INST_CORE_VER~'
+installscript='~INST_TOP~\bin\core_perl~INST_CORE_VER~'
+installsitearch='~INST_TOP~\lib\perl5\site_perl~INST_SITE_VER~~INST_ARCH~'
+installsitebin='~INST_TOP~\bin\site_perl~INST_SITE_VER~~INST_ARCH~'
+installsitehtml1dir='~INST_DOC~\share\doc\perl5\site_perl~INST_SITE_VER~'
+installsitehtml3dir='~INST_DOC~\share\doc\perl5\site_perl~INST_SITE_VER~'
+installsitelib='~INST_TOP~\lib\perl5\site_perl~INST_SITE_VER~'
+installsiteman1dir='~INST_DOC~\local\man\man1'
+installsiteman3dir='~INST_DOC~\local\man\man3'
+installsitescript='~INST_TOP~\bin\site_perl~INST_SITE_VER~'
+installstyle='lib/perl5'
installusrbinperl='undef'
-installvendorarch=''
-installvendorbin=''
-installvendorhtml1dir=''
-installvendorhtml3dir=''
-installvendorlib=''
-installvendorman1dir=''
-installvendorman3dir=''
-installvendorscript=''
+installvendorarch='~INST_TOP~\lib\perl5\vendor_perl~INST_VEND_VER~~INST_ARCH~'
+installvendorbin='~INST_TOP~\bin\vendor_perl~INST_VEND_VER~~INST_ARCH~'
+installvendorhtml1dir='~INST_DOC~\share\doc\perl5\vendor_perl~INST_VEND_VER~'
+installvendorhtml3dir='~INST_DOC~\share\doc\perl5\vendor_perl~INST_VEND_VER~'
+installvendorlib='~INST_TOP~\lib\perl5\vendor_perl~INST_VEND_VER~'
+installvendorman1dir='~INST_DOC~\share\man\man1'
+installvendorman3dir='~INST_DOC~\share\man\man3'
+installvendorscript='~INST_TOP~\bin\vendor_perl~INST_VEND_VER~'
intsize='4'
issymlink=''
ivdformat='"ld"'
@@ -909,12 +909,12 @@
mallocobj='malloc.o'
mallocsrc='malloc.c'
malloctype='void *'
-man1dir='~INST_TOP~~INST_VER~\man\man1'
-man1direxp='~INST_TOP~~INST_VER~\man\man1'
-man1ext='1'
-man3dir='~INST_TOP~~INST_VER~\man\man3'
-man3direxp='~INST_TOP~~INST_VER~\man\man3'
-man3ext='3'
+man1dir='~INST_DOC~\share\man\man1'
+man1direxp='~INST_DOC~\share\man\man1'
+man1ext='1perl'
+man3dir='~INST_DOC~\share\man\man3'
+man3direxp='~INST_DOC~\share\man\man3'
+man3ext='3perl'
mips_type=''
mistrustnm=''
mkdir='mkdir'
@@ -956,7 +956,7 @@
orderlib='false'
osname='MSWin32'
osvers='4.0'
-otherlibdirs=''
+otherlibdirs=' '
package='perl5'
pager='more /e'
passcat=''
@@ -967,9 +967,9 @@
perl_patchlevel='~PERL_PATCHLEVEL~'
perl_static_inline='static __inline__'
perl_thread_local=''
-perladmin=''
+perladmin=' '
perllibs='~libs~'
-perlpath='~INST_TOP~~INST_VER~\bin~INST_ARCH~\perl.exe'
+perlpath='~INST_TOP~\bin~INST_CORE_VER_PERL~~INST_ARCH~\perl.exe'
pg=''
phostname='hostname'
pidtype='int'
@@ -978,8 +978,8 @@
pr=''
prefix='~INST_TOP~'
prefixexp='~INST_TOP~'
-privlib='~INST_TOP~~INST_VER~\lib'
-privlibexp='~INST_TOP~~INST_VER~\lib'
+privlib='~INST_TOP~\lib\perl5\core_perl~INST_CORE_VER~'
+privlibexp='~INST_TOP~\lib\perl5\core_perl~INST_CORE_VER~'
procselfexe=''
prototype='define'
ptrsize='4'
@@ -1017,8 +1017,8 @@
sPRIx64='"lx"'
sSCNfldbl='"Lf"'
sched_yield=''
-scriptdir='~INST_TOP~~INST_VER~\bin'
-scriptdirexp='~INST_TOP~~INST_VER~\bin'
+scriptdir='~INST_TOP~\bin\core_perl~INST_CORE_VER~'
+scriptdirexp='~INST_TOP~\bin\core_perl~INST_CORE_VER~'
sed='sed'
seedfunc='Perl_drand48_init'
selectminbits='32'
@@ -1045,25 +1045,25 @@
sig_num_init='0, 1, 2, 21, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 20, 0'
sig_size='27'
signal_t='void'
-sitearch='~INST_TOP~\site~INST_VER~\lib~INST_ARCH~'
-sitearchexp='~INST_TOP~\site~INST_VER~\lib~INST_ARCH~'
-sitebin='~INST_TOP~\site~INST_VER~\bin~INST_ARCH~'
-sitebinexp='~INST_TOP~\site~INST_VER~\bin~INST_ARCH~'
-sitehtml1dir=''
-sitehtml1direxp=''
-sitehtml3dir=''
-sitehtml3direxp=''
-sitelib='~INST_TOP~\site~INST_VER~\lib'
-sitelib_stem=''
-sitelibexp='~INST_TOP~\site~INST_VER~\lib'
-siteman1dir=''
-siteman1direxp=''
-siteman3dir=''
-siteman3direxp=''
-siteprefix='~INST_TOP~\site~INST_VER~'
-siteprefixexp='~INST_TOP~\site~INST_VER~'
-sitescript=''
-sitescriptexp=''
+sitearch='~INST_TOP~\lib\perl5\site_perl~INST_SITE_VER~~INST_ARCH~'
+sitearchexp='~INST_TOP~\lib\perl5\site_perl~INST_SITE_VER~~INST_ARCH~'
+sitebin='~INST_TOP~\bin\site_perl~INST_SITE_VER~~INST_ARCH~'
+sitebinexp='~INST_TOP~\bin\site_perl~INST_SITE_VER~~INST_ARCH~'
+sitehtml1dir='~INST_DOC~\share\doc\perl5\site_perl~INST_SITE_VER~'
+sitehtml1direxp='~INST_DOC~\share\doc\perl5\site_perl~INST_SITE_VER~'
+sitehtml3dir='~INST_DOC~\share\doc\perl5\site_perl~INST_SITE_VER~'
+sitehtml3direxp='~INST_DOC~\share\doc\perl5\site_perl~INST_SITE_VER~'
+sitelib='~INST_TOP~\lib\perl5\site_perl~INST_SITE_VER~'
+sitelib_stem='~INST_TOP~\lib\perl5\site_perl'
+sitelibexp='~INST_TOP~\lib\perl5\site_perl~INST_SITE_VER~'
+siteman1dir='~INST_DOC~\local\man\man1'
+siteman1direxp='~INST_DOC~\local\man\man1'
+siteman3dir='~INST_DOC~\local\man\man3'
+siteman3direxp='~INST_DOC~\local\man\man3'
+siteprefix='~INST_TOP~'
+siteprefixexp='~INST_TOP~'
+sitescript='~INST_TOP~\bin\site_perl~INST_SITE_VER~'
+sitescriptexp='~INST_TOP~\bin\site_perl~INST_SITE_VER~'
sizesize='4'
sizetype='size_t'
sleep=''
@@ -1162,7 +1162,7 @@
usesitecustomize='undef'
usesocks='undef'
usethreads='undef'
-usevendorprefix='undef'
+usevendorprefix='define'
usevfork='false'
usrinc='/usr/include'
uuname=''
@@ -1172,25 +1172,25 @@
uvtype='unsigned long'
uvuformat='"lu"'
uvxformat='"lx"'
-vendorarch=''
-vendorarchexp=''
-vendorbin=''
-vendorbinexp=''
-vendorhtml1dir=' '
-vendorhtml1direxp=''
-vendorhtml3dir=' '
-vendorhtml3direxp=''
-vendorlib=''
-vendorlib_stem=''
-vendorlibexp=''
-vendorman1dir=' '
-vendorman1direxp=''
-vendorman3dir=' '
-vendorman3direxp=''
-vendorprefix=''
-vendorprefixexp=''
-vendorscript=''
-vendorscriptexp=''
+vendorarch='~INST_TOP~\lib\perl5\vendor_perl~INST_VEND_VER~~INST_ARCH~'
+vendorarchexp='~INST_TOP~\lib\perl5\vendor_perl~INST_VEND_VER~~INST_ARCH~'
+vendorbin='~INST_TOP~\bin\vendor_perl~INST_VEND_VER~~INST_ARCH~'
+vendorbinexp='~INST_TOP~\bin\vendor_perl~INST_VEND_VER~~INST_ARCH~'
+vendorhtml1dir='~INST_DOC~\share\doc\perl5\vendor_perl~INST_VEND_VER~'
+vendorhtml1direxp='~INST_DOC~\share\doc\perl5\vendor_perl~INST_VEND_VER~'
+vendorhtml3dir='~INST_DOC~\share\doc\perl5\vendor_perl~INST_VEND_VER~'
+vendorhtml3direxp='~INST_DOC~\share\doc\perl5\vendor_perl~INST_VEND_VER~'
+vendorlib='~INST_TOP~\lib\perl5\vendor_perl~INST_VEND_VER~'
+vendorlib_stem='~INST_TOP~\lib\perl5\vendor_perl'
+vendorlibexp='~INST_TOP~\lib\perl5\vendor_perl~INST_VEND_VER~'
+vendorman1dir='~INST_DOC~\share\man\man1'
+vendorman1direxp='~INST_DOC~\share\man\man1'
+vendorman3dir='~INST_DOC~\share\man\man3'
+vendorman3direxp='~INST_DOC~\share\man\man3'
+vendorprefix='~INST_TOP~'
+vendorprefixexp='~INST_TOP~'
+vendorscript='~INST_TOP~\bin\vendor_perl~INST_VEND_VER~'
+vendorscriptexp='~INST_TOP~\bin\vendor_perl~INST_VEND_VER~'
version=''
version_patchlevel_string=''
versiononly='undef'
--- a/win32/Makefile
+++ b/win32/Makefile
@@ -21,6 +21,7 @@
#
INST_DRV = c:
INST_TOP = $(INST_DRV)\perl
+INST_DOC = $(INST_TOP)
#
# Uncomment if you want to build a 32-bit Perl using a 32-bit compiler
@@ -37,7 +38,15 @@
# versioned installation can be obtained by setting INST_TOP above to a
# path that includes an arbitrary version string.
#
-#INST_VER = \5.38.4
+INST_VER *= \5.38.4
+INST_VER_PERL *= \perl-5.38.4
+
+INST_SITE_VER *= $(INST_VER)
+#INST_VEND_VER *= $(INST_VER)
+#INST_CORE_VER *= $(INST_VER)
+INST_SITE_VER_PERL *= $(INST_VER_PERL)
+#INST_VEND_VER_PERL *= $(INST_VER_PERL)
+#INST_CORE_VER_PERL *= $(INST_VER_PERL)
#
# Comment this out if you DON'T want your perl installation to have
@@ -397,12 +406,12 @@
PODDIR = ..\pod
HTMLDIR = .\html
-INST_SCRIPT = $(INST_TOP)$(INST_VER)\bin
-INST_BIN = $(INST_SCRIPT)$(INST_ARCH)
-INST_LIB = $(INST_TOP)$(INST_VER)\lib
-INST_ARCHLIB = $(INST_LIB)$(INST_ARCH)
+INST_SCRIPT = $(INST_TOP)\bin\core_perl$(INST_CORE_VER)
+INST_BIN = $(INST_TOP)\bin$(INST_CORE_VER_PERL)$(INST_ARCH)
+INST_LIB = $(INST_TOP)\lib\perl5\core_perl$(INST_CORE_VER)
+INST_ARCHLIB = $(INST_TOP)\lib\perl5\core_perl$(INST_CORE_VER)$(INST_ARCH)
INST_COREDIR = $(INST_ARCHLIB)\CORE
-INST_HTML = $(INST_TOP)$(INST_VER)\html
+INST_HTML = $(INST_DOC)\share\doc\perl5$(INST_CORE_VER)
#
# Programs to compile, build .lib files and link
@@ -818,8 +827,15 @@
CFG_VARS = \
"INST_TOP=$(INST_TOP)" \
+ "INST_DOC=$(INST_DOC)" \
"INST_VER=$(INST_VER)" \
"INST_ARCH=$(INST_ARCH)" \
+ "INST_SITE_VER=$(INST_SITE_VER)" \
+ "INST_VEND_VER=$(INST_VEND_VER)" \
+ "INST_CORE_VER=$(INST_CORE_VER)" \
+ "INST_SITE_VER_PERL=$(INST_SITE_VER_PERL)" \
+ "INST_VEND_VER_PERL=$(INST_VEND_VER_PERL)" \
+ "INST_CORE_VER_PERL=$(INST_CORE_VER_PERL)" \
"archname=$(ARCHNAME)" \
"cc=$(CC)" \
"ld=$(LINK32)" \
@@ -1185,7 +1201,7 @@
$(MINIPERL) -I..\lib ..\pod\perlmodlib.PL -q ..
..\pod\perltoc.pod: $(PERLEXE) Extensions Extensions_nonxs
- $(PERLEXE) -f ..\pod\buildtoc -q
+ $(PERLEXE) -I..\lib -Ilib -f ..\pod\buildtoc -q
# Note that the pod cleanup in this next section is parsed (and regenerated
# by pod/buildtoc so please check that script before making changes here
--- a/win32/win32.c
+++ b/win32/win32.c
@@ -391,10 +391,36 @@
return NULL;
}
+#define MSYS_PERL_VENDORLIB "lib/perl5/vendor_perl"
+#define MSYS_SITELIB "lib/perl5/site_perl"
+#define MSYS_PRIVLIB "lib/perl5/core_perl"
+
+#ifndef PERL_VENDORLIB_NAME
+#ifdef PERL_IS_MINIPERL
+ #define PERL_VENDORLIB_NAME "vendor"
+#else
+ #define PERL_VENDORLIB_NAME MSYS_PERL_VENDORLIB
+#endif
+#endif
+#ifndef SITELIB_NAME
+#ifdef PERL_IS_MINIPERL
+# define SITELIB_NAME "site"
+#else
+# define SITELIB_NAME MSYS_SITELIB
+#endif
+#endif
+#ifndef PRIVLIB_NAME
+#ifdef PERL_IS_MINIPERL
+# define PRIVLIB_NAME "lib"
+#else
+# define PRIVLIB_NAME MSYS_PRIVLIB
+#endif
+#endif
+
EXTERN_C char *
win32_get_privlib(WIN32_NO_REGISTRY_M_(const char *pl) STRLEN *const len)
{
- const char *stdlib = "lib";
+ const char *stdlib = PRIVLIB_NAME;
SV *sv = NULL;
#ifndef WIN32_NO_REGISTRY
char buffer[MAX_PATH+1];
@@ -428,7 +454,11 @@
/* $xlib .=
* ";$EMD/" . ((-d $EMD/../../../$]) ? "../../.." : "../.."). "/$libname/$]/lib"; */
+#ifdef PERL_IS_MINIPERL
sprintf(pathstr, "%s/%s/lib", libname, pl);
+#else
+ sprintf(pathstr, "%s/%s", libname, pl);
+#endif
(void)get_emd_part(&sv1, NULL, pathstr, ARCHNAME, "bin", pl, NULL);
#ifndef WIN32_NO_REGISTRY
@@ -438,7 +468,11 @@
/* $xlib .=
* ";$EMD/" . ((-d $EMD/../../../$]) ? "../../.." : "../.."). "/$libname/lib"; */
+#ifdef PERL_IS_MINIPERL
sprintf(pathstr, "%s/lib", libname);
+#else
+ sprintf(pathstr, "%s", libname);
+#endif
(void)get_emd_part(&sv2, NULL, pathstr, ARCHNAME, "bin", pl, NULL);
if (!sv1 && !sv2)
@@ -459,13 +493,9 @@
EXTERN_C char *
win32_get_sitelib(const char *pl, STRLEN *const len)
{
- return win32_get_xlib(pl, WIN32_NO_REGISTRY_M_("sitelib") "site", len);
+ return win32_get_xlib(pl, WIN32_NO_REGISTRY_M_("sitelib") SITELIB_NAME, len);
}
-#ifndef PERL_VENDORLIB_NAME
-# define PERL_VENDORLIB_NAME "vendor"
-#endif
-
EXTERN_C char *
win32_get_vendorlib(const char *pl, STRLEN *const len)
{