diff options
Diffstat (limited to 'lang/perl5.6/files')
-rw-r--r-- | lang/perl5.6/files/patch-CGI.pm | 15 | ||||
-rw-r--r-- | lang/perl5.6/files/patch-Configure | 110 | ||||
-rw-r--r-- | lang/perl5.6/files/patch-DynaLoader-Makefile.PL | 11 | ||||
-rw-r--r-- | lang/perl5.6/files/patch-Install.pm | 13 | ||||
-rw-r--r-- | lang/perl5.6/files/patch-POSIX.xs | 19 | ||||
-rw-r--r-- | lang/perl5.6/files/patch-Path.pm | 30 | ||||
-rw-r--r-- | lang/perl5.6/files/patch-ab | 13 | ||||
-rw-r--r-- | lang/perl5.6/files/patch-ad | 20 | ||||
-rw-r--r-- | lang/perl5.6/files/patch-ae | 18 | ||||
-rw-r--r-- | lang/perl5.6/files/patch-freebsd.sh | 41 | ||||
-rw-r--r-- | lang/perl5.6/files/patch-mg.c | 13 | ||||
-rw-r--r-- | lang/perl5.6/files/patch-perl.c | 58 | ||||
-rw-r--r-- | lang/perl5.6/files/use.perl | 258 |
13 files changed, 0 insertions, 619 deletions
diff --git a/lang/perl5.6/files/patch-CGI.pm b/lang/perl5.6/files/patch-CGI.pm deleted file mode 100644 index 01410684a7ed..000000000000 --- a/lang/perl5.6/files/patch-CGI.pm +++ /dev/null @@ -1,15 +0,0 @@ ---- lib/CGI.pm.orig Tue Sep 30 10:16:33 2003 -+++ lib/CGI.pm Tue Sep 30 10:20:35 2003 -@@ -1497,8 +1497,10 @@ sub startform { - $method = lc($method) || 'post'; - $enctype = $enctype || &URL_ENCODED; - unless (defined $action) { -- $action = $self->url(-absolute=>1,-path=>1); -- $action .= "?$ENV{QUERY_STRING}" if $ENV{QUERY_STRING}; -+ $action = $self->escapeHTML($self->url(-absolute=>1,-path=>1)); -+ if (length($ENV{QUERY_STRING})>0) { -+ $action .= "?".$self->escapeHTML($ENV{QUERY_STRING},1); -+ } - } - $action = qq(action="$action"); - my($other) = @other ? " @other" : ''; diff --git a/lang/perl5.6/files/patch-Configure b/lang/perl5.6/files/patch-Configure deleted file mode 100644 index 0dfc95d62e2b..000000000000 --- a/lang/perl5.6/files/patch-Configure +++ /dev/null @@ -1,110 +0,0 @@ ---- Configure.orig Wed Sep 24 00:48:53 2003 -+++ Configure Tue Feb 1 21:40:07 2005 -@@ -296,7 +296,7 @@ cppflags='' - ldflags='' - lkflags='' - locincpth='' --optimize='' -+optimize=${CFLAGS:-''} - cf_email='' - cf_by='' - cf_time='' -@@ -889,6 +889,12 @@ installsitelib='' - sitelib='' - sitelib_stem='' - sitelibexp='' -+installsiteman1dir='' -+siteman1dir='' -+siteman1direxp='' -+installsiteman3dir='' -+siteman3dir='' -+siteman3direxp='' - siteprefix='' - siteprefixexp='' - sizesize='' -@@ -1016,6 +1022,8 @@ plibpth='' - libswanted='' - : some systems want to use only the non-versioned libso:s - ignore_versioned_solibs='' -+siteman1dir='' -+siteman3dir='' - archname64='' - ccflags_uselargefiles='' - ldflags_uselargefiles='' -@@ -7604,6 +7612,47 @@ else - installsitebin="$sitebinexp" - fi - -+: determine where add-on manual pages go -+case "$siteman1dir" in -+'') dflt=`echo $man1dir | $sed "s#^$prefix#$siteprefix#"` ;; -+*) dflt=$siteman1dir ;; -+esac -+case "$dflt" in -+''|' ') dflt=none ;; -+esac -+fn=dn+~ -+rp='Pathname where the site-specific manual pages should be installed?' -+. ./getfile -+siteman1dir="$ans" -+siteman1direxp="$ansexp" -+: Change installation prefix, if necessary. -+if $test X"$prefix" != X"$installprefix"; then -+ installsiteman1dir=`echo $siteman1direxp | $sed "s#^$prefix#$installprefix#"` -+else -+ installsiteman1dir="$siteman1direxp" -+fi -+ -+: determine where add-on library man pages go -+case "$siteman3dir" in -+'') dflt=`echo $man3dir | $sed "s#^$prefix#$siteprefix#"` ;; -+*) dflt=$siteman3dir ;; -+esac -+case "$dflt" in -+''|' ') dflt=none ;; -+esac -+fn=dn+~ -+rp='Pathname where the site-specific library manual pages should be installed?' -+. ./getfile -+siteman3dir="$ans" -+siteman3direxp="$ansexp" -+: Change installation prefix, if necessary. -+if $test X"$prefix" != X"$installprefix"; then -+ installsiteman3dir=`echo $siteman3direxp | $sed "s#^$prefix#$installprefix#"` -+else -+ installsiteman3dir="$siteman3direxp" -+fi -+ -+ - case "$useperlio" in - $define|true|[yY]*) dflt='y';; - *) dflt='n';; -@@ -14993,7 +15042,7 @@ for i in \`$cc -v -c tmp.c 2>&1 $postpro - do - case "\$i" in - -D*) echo "\$i" | $sed 's/^-D//';; -- -A*) $test "$gccversion" && echo "\$i" | $sed 's/^-A\(.*\)(\(.*\))/\1=\2/';; -+ -A*) $test "$gccversion" && echo "\$i" | $sed 's/^-A//' | $sed 's/\(.*\)(\(.*\))/\1=\2/';; - esac - done - $rm -f try.c -@@ -16196,6 +16245,8 @@ installscript='$installscript' - installsitearch='$installsitearch' - installsitebin='$installsitebin' - installsitelib='$installsitelib' -+nstallsiteman1dir='$installsiteman1dir' -+installsiteman3dir='$installsiteman3dir' - installstyle='$installstyle' - installusrbinperl='$installusrbinperl' - installvendorarch='$installvendorarch' -@@ -16365,6 +16416,10 @@ sitebinexp='$sitebinexp' - sitelib='$sitelib' - sitelib_stem='$sitelib_stem' - sitelibexp='$sitelibexp' -+siteman1dir='$siteman1dir' -+siteman1direxp='$siteman1direxp' -+siteman3dir='$siteman3dir' -+siteman3direxp='$siteman3direxp' - siteprefix='$siteprefix' - siteprefixexp='$siteprefixexp' - sizesize='$sizesize' diff --git a/lang/perl5.6/files/patch-DynaLoader-Makefile.PL b/lang/perl5.6/files/patch-DynaLoader-Makefile.PL deleted file mode 100644 index 9d01fad88e5c..000000000000 --- a/lang/perl5.6/files/patch-DynaLoader-Makefile.PL +++ /dev/null @@ -1,11 +0,0 @@ ---- ext/DynaLoader/Makefile.PL.orig Mon Nov 24 21:47:20 2003 -+++ ext/DynaLoader/Makefile.PL Mon Nov 24 21:56:15 2003 -@@ -1,5 +1,8 @@ - use ExtUtils::MakeMaker; - -+my $ccflags = $Config::Config{ccflags}; -+tied(%Config::Config)->{ccflags} = "$ccflags -DPIC -fPIC"; -+ - WriteMakefile( - NAME => 'DynaLoader', - LINKTYPE => 'static', diff --git a/lang/perl5.6/files/patch-Install.pm b/lang/perl5.6/files/patch-Install.pm deleted file mode 100644 index 228b24a1088a..000000000000 --- a/lang/perl5.6/files/patch-Install.pm +++ /dev/null @@ -1,13 +0,0 @@ -$FreeBSD$ - ---- lib/ExtUtils/Install.pm.orig Fri Feb 23 03:57:55 2001 -+++ lib/ExtUtils/Install.pm Wed Jul 10 17:57:13 2002 -@@ -132,7 +132,7 @@ - $diff++; - } - -- if ($diff){ -+ if ($diff||1){ - if (-f $targetfile){ - forceunlink($targetfile) unless $nonono; - } else { diff --git a/lang/perl5.6/files/patch-POSIX.xs b/lang/perl5.6/files/patch-POSIX.xs deleted file mode 100644 index 7a3caa960822..000000000000 --- a/lang/perl5.6/files/patch-POSIX.xs +++ /dev/null @@ -1,19 +0,0 @@ ---- ext/POSIX/POSIX.xs.orig Tue Feb 1 11:55:24 2005 -+++ ext/POSIX/POSIX.xs Tue Feb 1 11:56:43 2005 -@@ -3860,6 +3860,16 @@ - mytm.tm_yday = yday; - mytm.tm_isdst = isdst; - mini_mktime(&mytm); -+ /* use libc to normalize the thing -- @@@ -- FreeBSD PR 74042, perl bug 18238 */ -+ { -+ struct tm mytm2; -+ time_t t; -+ mytm2 = mytm; -+ t = mktime(&mytm2); -+ mytm2 = *localtime(&t); -+ mytm.tm_gmtoff = mytm2.tm_gmtoff; -+ mytm.tm_zone = mytm2.tm_zone; -+ } - len = strftime(tmpbuf, sizeof tmpbuf, fmt, &mytm); - /* - ** The following is needed to handle to the situation where diff --git a/lang/perl5.6/files/patch-Path.pm b/lang/perl5.6/files/patch-Path.pm deleted file mode 100644 index 2735b0f6a648..000000000000 --- a/lang/perl5.6/files/patch-Path.pm +++ /dev/null @@ -1,30 +0,0 @@ -$FreeBSD$ ---- lib/File/Path.pm.orig Sat Jan 29 20:23:40 2005 -+++ lib/File/Path.pm Sat Jan 29 20:24:56 2005 -@@ -196,7 +196,7 @@ sub rmtree { - # it's also intended to change it to writable in case we have - # to recurse in which case we are better than rm -rf for - # subtrees with strange permissions -- chmod(0777, ($Is_VMS ? VMS::Filespec::fileify($root) : $root)) -+ chmod(0700, ($Is_VMS ? VMS::Filespec::fileify($root) : $root)) - or carp "Can't make directory $root read+writeable: $!" - unless $safe; - -@@ -230,7 +230,7 @@ sub rmtree { - print "skipped $root\n" if $verbose; - next; - } -- chmod 0777, $root -+ chmod 0700, $root - or carp "Can't make directory $root writeable: $!" - if $force_writeable; - print "rmdir $root\n" if $verbose; -@@ -252,7 +252,7 @@ sub rmtree { - print "skipped $root\n" if $verbose; - next; - } -- chmod 0666, $root -+ chmod 0600, $root - or carp "Can't make file $root writeable: $!" - if $force_writeable; - print "unlink $root\n" if $verbose; diff --git a/lang/perl5.6/files/patch-ab b/lang/perl5.6/files/patch-ab deleted file mode 100644 index 3cb0692940b6..000000000000 --- a/lang/perl5.6/files/patch-ab +++ /dev/null @@ -1,13 +0,0 @@ -$FreeBSD$ - ---- installperl.ORIG Thu Jul 30 15:58:50 1998 -+++ installperl Thu Jul 30 16:02:16 1998 -@@ -269,7 +269,7 @@ - (-l $usrbinperl) && - ((readlink $usrbinperl) eq $expinstperl)); - } -- if ((! $mainperl_is_instperl) && -+ if ('' && (! $mainperl_is_instperl) && - (yn("Many scripts expect perl to be installed as $usrbinperl.\n" . - "Do you wish to have $usrbinperl be the same as\n" . - "$expinstperl? [y] "))) diff --git a/lang/perl5.6/files/patch-ad b/lang/perl5.6/files/patch-ad deleted file mode 100644 index fa9bf3ebfc2e..000000000000 --- a/lang/perl5.6/files/patch-ad +++ /dev/null @@ -1,20 +0,0 @@ -$FreeBSD$ - ---- perl.h.ORIG Thu Mar 22 07:05:02 2001 -+++ perl.h Tue Apr 10 20:29:46 2001 -@@ -151,6 +151,15 @@ - - */ - -+/* needed for IAMSUID case for 4.4BSD systems -+ * XXX there should probably be a Configure variable -+ */ -+ -+#ifdef I_SYS_PARAM -+#if (defined (BSD) && (BSD >= 199306)) -+# include <sys/mount.h> -+#endif /* !BSD */ -+#endif /* !I_SYS_PARAM */ - - class CPerlObj; - diff --git a/lang/perl5.6/files/patch-ae b/lang/perl5.6/files/patch-ae deleted file mode 100644 index 21e8da5bbe62..000000000000 --- a/lang/perl5.6/files/patch-ae +++ /dev/null @@ -1,18 +0,0 @@ ---- makedepend.SH.orig Wed Jul 30 18:46:59 2003 -+++ makedepend.SH Wed May 2 22:24:46 2007 -@@ -73,6 +73,7 @@ - case "$osname" in - os2) ;; - netbsd) ;; -+ freebsd) ;; - *) $touch $firstmakefile ;; - esac - fi -@@ -163,6 +164,7 @@ - -e '/^#.*<builtin>/d' \ - -e '/^#.*<built-in>/d' \ - -e '/^#.*<command line>/d' \ -+ -e '/^#.*<command-line>/d' \ - -e '/^#.*"-"/d' \ - -e 's#\.[0-9][0-9]*\.c#'"$file.c#" \ - -e 's/^[ ]*#[ ]*line/#/' \ diff --git a/lang/perl5.6/files/patch-freebsd.sh b/lang/perl5.6/files/patch-freebsd.sh deleted file mode 100644 index a8bfe762ce59..000000000000 --- a/lang/perl5.6/files/patch-freebsd.sh +++ /dev/null @@ -1,41 +0,0 @@ ---- hints/freebsd.sh.orig Wed Oct 15 22:26:16 2003 -+++ hints/freebsd.sh Mon Feb 19 21:16:03 2007 -@@ -101,7 +101,14 @@ case "$osvers" in - "") usemymalloc='n' - ;; - esac -+ d_setregid='define' -+ d_setreuid='define' -+ d_setegid='define' -+ d_seteuid='define' - libswanted=`echo $libswanted | sed 's/ malloc / /'` -+ libswanted=`echo $libswanted | sed 's/ bind / /'` -+ libswanted=`echo $libswanted | sed 's/ iconv / /'` -+ libswanted=`echo $libswanted | sed 's/ dl / /'` - ;; - esac - -@@ -116,17 +123,17 @@ case "$osvers" in - - *) - objformat=`/usr/bin/objformat` -- if [ x$objformat = xelf ]; then -- libpth="/usr/lib /usr/local/lib" -- glibpth="/usr/lib /usr/local/lib" -- ldflags="-Wl,-E " -- lddlflags="-shared " -- else -+ if [ x$objformat = xaout ]; then - if [ -e /usr/lib/aout ]; then - libpth="/usr/lib/aout /usr/local/lib /usr/lib" - glibpth="/usr/lib/aout /usr/local/lib /usr/lib" - fi - lddlflags='-Bshareable' -+ else -+ libpth="/usr/lib /usr/local/lib" -+ glibpth="/usr/lib /usr/local/lib" -+ ldflags="-Wl,-E " -+ lddlflags="-shared " - fi - cccdlflags='-DPIC -fPIC' - ;; diff --git a/lang/perl5.6/files/patch-mg.c b/lang/perl5.6/files/patch-mg.c deleted file mode 100644 index 715fdc06f893..000000000000 --- a/lang/perl5.6/files/patch-mg.c +++ /dev/null @@ -1,13 +0,0 @@ -$FreeBSD$ - ---- mg.c.orig Tue Oct 29 16:24:52 2002 -+++ mg.c Tue Oct 29 16:32:26 2002 -@@ -562,6 +562,8 @@ Perl_magic_get(pTHX_ SV *sv, MAGIC *mg) - (void)SvOK_off(sv); - else if (PL_in_eval) - sv_setiv(sv, PL_in_eval & ~(EVAL_INREQUIRE)); -+ else -+ sv_setiv(sv, 0); - } - break; - case '\024': /* ^T */ diff --git a/lang/perl5.6/files/patch-perl.c b/lang/perl5.6/files/patch-perl.c deleted file mode 100644 index b9b348bef069..000000000000 --- a/lang/perl5.6/files/patch-perl.c +++ /dev/null @@ -1,58 +0,0 @@ -$FreeBSD$ - ---- perl.c.orig Sun Jun 2 12:29:01 2002 -+++ perl.c Sun Jun 2 12:30:14 2002 -@@ -3407,6 +3407,26 @@ - #endif /* VMS */ - } - -+#ifdef SITEARCH_EXP -+ /* sitearch is always relative to sitelib on Windows for -+ * DLL-based path intuition to work correctly */ -+# if !defined(WIN32) -+ incpush(SITEARCH_EXP, FALSE, FALSE); -+# endif -+#endif -+ -+#ifdef SITELIB_EXP -+# if defined(WIN32) -+ incpush(SITELIB_EXP, TRUE, FALSE); /* this picks up sitearch as well */ -+# else -+ incpush(SITELIB_EXP, FALSE, FALSE); -+# endif -+#endif -+ -+#ifdef SITELIB_STEM /* Search for version-specific dirs below here */ -+ incpush(SITELIB_STEM, FALSE, TRUE); -+#endif -+ - /* Use the ~-expanded versions of APPLLIB (undocumented), - ARCHLIB PRIVLIB SITEARCH SITELIB VENDORARCH and VENDORLIB - */ -@@ -3445,26 +3465,6 @@ - incpush(PRIVLIB_EXP, TRUE, FALSE); - #else - incpush(PRIVLIB_EXP, FALSE, FALSE); --#endif -- --#ifdef SITEARCH_EXP -- /* sitearch is always relative to sitelib on Windows for -- * DLL-based path intuition to work correctly */ --# if !defined(WIN32) -- incpush(SITEARCH_EXP, FALSE, FALSE); --# endif --#endif -- --#ifdef SITELIB_EXP --# if defined(WIN32) -- incpush(SITELIB_EXP, TRUE, FALSE); /* this picks up sitearch as well */ --# else -- incpush(SITELIB_EXP, FALSE, FALSE); --# endif --#endif -- --#ifdef SITELIB_STEM /* Search for version-specific dirs below here */ -- incpush(SITELIB_STEM, FALSE, TRUE); - #endif - - #ifdef PERL_VENDORARCH_EXP diff --git a/lang/perl5.6/files/use.perl b/lang/perl5.6/files/use.perl deleted file mode 100644 index c5c8d71a51c0..000000000000 --- a/lang/perl5.6/files/use.perl +++ /dev/null @@ -1,258 +0,0 @@ -#!/bin/sh - -# $FreeBSD$ - -this=`echo -n $0 | /usr/bin/sed -e 's!^.*/!!'` -PERL_VERSION="%%PERL_VERSION%%" -MAKE_CONF=%%MAKE_CONF%% -banner=`date +"%F %T"` -banner="# added by use.perl $banner" -if [ -z "${OSVERSION}" ]; then - if [ -f /sbin/sysctl -a -x /sbin/sysctl ] ; then - osreldate=`/sbin/sysctl -n kern.osreldate` - else - osreldate=`/usr/sbin/sysctl -n kern.osreldate` - fi -else - osreldate=${OSVERSION} -fi - -if [ "x$this" = "xuse.perl" ]; then - PKG_PREFIX="%%PREFIX%%" - if [ "$1" = "port" ] ; then - need_remove_links=yes - need_create_links=yes - need_cleanup_make_conf=yes - need_cleanup_manpath=yes - need_spam_make_conf=yes - need_spam_manpath=yes - elif [ "$1" = "system" ] ; then - need_remove_links=yes - if [ $osreldate -lt 500036 ] ; then - need_base_system_perl=yes - fi - need_cleanup_make_conf=yes - need_cleanup_manpath=yes - else - echo 'Usage: - $0 port -> /usr/bin/perl is the perl5 port - $0 system -> /usr/bin/perl is the system perl' - exit 2; - fi -else - if [ "$2" = "POST-INSTALL" ] ; then - need_post_install=yes - elif [ "$2" = "POST-DEINSTALL" ] ; then - # XXX this needs a more intelligent handling - # XXX since we would not want to remove perl5.8's links - need_remove_links=yes - if [ $osreldate -lt 500036 ] ; then - need_base_system_perl=yes - fi - need_cleanup_make_conf=yes - need_cleanup_manpath=yes - else - exit 0; - fi -fi - -link_list=" - a2p - c2ph - find2perl - h2ph - h2xs - perlbug - perlcc - perldoc - pl2pm - pod2html - pod2latex - pod2man - pod2text - s2p - splain" -if [ $osreldate -ge 500036 ] ; then - link_list="" -fi -special_link_list=" - perl - perl5 - suidperl" - -do_remove_links() -{ - echo "Removing stale symlinks from /usr/bin..." - for binary in $link_list $special_link_list - do - if [ -L "/usr/bin/$binary" ] ; then - echo " Removing /usr/bin/$binary" - /bin/rm -f "/usr/bin/$binary" - else - echo " Skipping /usr/bin/$binary" - fi - done - bins=`/bin/ls /usr/bin/*perl*5.* ${PKG_PREFIX}/bin/*perl*5.* 2>/dev/null` - for binary in $bins - do - if [ -L "$binary" ] ; then - echo " Removing $binary installed by an older perl port" - /bin/rm -f "$binary" - fi - done - echo "Done." -} - -do_create_links() -{ - echo "Creating various symlinks in /usr/bin..." - for binary in $link_list - do - if [ -f "/usr/bin/$binary" ] ; then - echo " Backing up /usr/bin/$binary as /usr/bin/$binary.freebsd" - /bin/mv -f "/usr/bin/$binary" "/usr/bin/$binary.freebsd" - fi - if [ -e "/usr/bin/$binary" ] ; then - echo " *** /usr/bin/$binary is still there, which should not happen" - elif [ -e "$PKG_PREFIX/bin/$binary" ] ; then - echo " Symlinking $PKG_PREFIX/bin/$binary to /usr/bin/$binary" - /bin/ln -sf "$PKG_PREFIX/bin/$binary" "/usr/bin/$binary" - else - echo " *** $PKG_PREFIX/bin/$binary is not there, a symlink won't do any good" - fi - done - for binary in $special_link_list - do - if [ -f "/usr/bin/$binary" ] ; then - echo " Removing /usr/bin/$binary" - fi - bin=`echo $binary | /usr/bin/sed -e 's!perl5!perl!'` - bin=`echo $bin | /usr/bin/sed -e 's!suidperl!sperl!'` - if [ -e "/usr/bin/$binary.XXX" ] ; then - echo " *** /usr/bin/$binary is still there, which should not happen" - elif [ -e "$PKG_PREFIX/bin/${bin}%%PERL_VERSION%%" ] ; then - echo " Symlinking $PKG_PREFIX/bin/${bin}%%PERL_VERSION%% to /usr/bin/$binary" - /bin/ln -sf "$PKG_PREFIX/bin/${bin}%%PERL_VERSION%%" "/usr/bin/$binary" - else - echo " *** $PKG_PREFIX/bin/${bin}%%PERL_VERSION%% is not there, a symlink won't do any good" - fi - done - echo "Done." -} - -do_base_system_perl() -{ - echo "Restoring base system perl binaries..." - for binary in $link_list - do - if [ -e "/usr/bin/$binary" ] ; then - echo " *** /usr/bin/$binary is there, which should not happen" - else - if [ -f "/usr/bin/$binary.freebsd" ] ; then - echo " Moving /usr/bin/$binary.freebsd to /usr/bin/$binary" - /bin/mv -f "/usr/bin/$binary.freebsd" "/usr/bin/$binary" - else - echo " *** /usr/bin/$binary.freebsd is NOT there, nothing to restore" - fi - fi - done - for binary in $special_link_list - do - if [ -e "/usr/bin/$binary" ] ; then - echo " *** /usr/bin/$binary is there, which should not happen" - else - bin=`echo $binary | /usr/bin/sed -e 's!perl5!perl!'` - bin=`echo $bin | /usr/bin/sed -e 's!suidperl!sperl!'` - bins=`/bin/ls /usr/bin/${bin}5.* 2>/dev/null | /usr/bin/sort` - bin="" - for b in $bins - do - if [ -f $b -a ! -L $b ] ; then - bin=$b - fi - done - if [ -z $bin ] ; then - echo " *** cannot find what /usr/bin/$binary shall be restored FROM" - elif [ -f $bin ] ; then - echo " Hardlinking $bin to /usr/bin/$binary" - ln -f "$bin" "/usr/bin/$binary" - else - echo " *** $bin is NOT there, nothing to restore" - fi - fi - done - echo "Done." -} - -do_post_install() -{ - INCLUDEDIR=/usr/include - install -d ${PKG_PREFIX}/lib/perl5/site_perl/%%PERL_VERSION%%/%%PERL_ARCH%%/auto - install -d ${PKG_PREFIX}/lib/perl5/site_perl/%%PERL_VERSION%%/auto - install -d ${PKG_PREFIX}/lib/perl5/%%PERL_VERSION%%/man/man3 - cd ${INCLUDEDIR} && ${PKG_PREFIX}/bin/h2ph *.h machine/*.h sys/*.h >/dev/null -} - -do_cleanup_make_conf() -{ - echo -n "Cleaning up ${MAKE_CONF}..." - if [ -f ${MAKE_CONF} ] ; then - /usr/bin/awk 's=0; - /^#.*use.perl/ { s=1; mode=1 } - /^#/ { s=1; if (mode != 1) { mode=0 } } - /.*PERL.*=/ { s=1; if (mode == 1) { mode=2 } } - /^$/ { s=1; if (mode != 2) { mode = 0 } } - { if (s != 1) { mode = 0 } if (mode == 0) print }' ${MAKE_CONF} >${MAKE_CONF}.new - /bin/mv ${MAKE_CONF} ${MAKE_CONF}.bak - /bin/mv ${MAKE_CONF}.new ${MAKE_CONF} - fi - echo " Done." -} - -do_cleanup_manpath() -{ - echo -n "Cleaning up /etc/manpath.config..." - if [ -f /etc/manpath.config ] ; then - /usr/bin/awk 's=0; - /^#.*use.perl/ { s=1; mode=1 } - /^#/ { s=1; if (mode != 1) { mode=0 } } - /^OPTIONAL_MANPATH.*perl5/ { s=1; if (mode == 1) { mode=2 } } - /^$/ { s=1; if (mode != 2) { mode = 0 } } - { if (s != 1) { mode = 0 } if (mode == 0) print }' /etc/manpath.config >/etc/manpath.config.new - /bin/mv /etc/manpath.config /etc/manpath.config.bak - /bin/mv /etc/manpath.config.new /etc/manpath.config - fi - echo " Done." -} - -do_spam_make_conf() -{ - echo -n "Spamming ${MAKE_CONF}..." - echo "$banner" >>${MAKE_CONF} - echo "PERL_VER=%%PERL_VER%%" >>${MAKE_CONF} - echo "PERL_VERSION=%%PERL_VERSION%%" >>${MAKE_CONF} - if [ $osreldate -lt 500036 ] ; then - echo "NOPERL=yes" >>${MAKE_CONF} - fi - echo " Done." -} - -do_spam_manpath() -{ - echo -n "Spamming /etc/manpath.config..." - echo "$banner" >>/etc/manpath.config - echo "OPTIONAL_MANPATH ${PKG_PREFIX}/lib/perl5/%%PERL_VERSION%%/man" >>/etc/manpath.config - echo "OPTIONAL_MANPATH ${PKG_PREFIX}/lib/perl5/%%PERL_VERSION%%/perl/man" >>/etc/manpath.config - echo " Done." -} - -[ $need_remove_links ] && do_remove_links -[ $need_create_links ] && do_create_links -[ $need_base_system_perl ] && do_base_system_perl -[ $need_post_install ] && do_post_install -[ $need_cleanup_make_conf ] && do_cleanup_make_conf -[ $need_spam_make_conf ] && do_spam_make_conf -[ $need_cleanup_manpath ] && do_cleanup_manpath -[ $need_spam_manpath ] && do_spam_manpath - -exit 0 |