summaryrefslogtreecommitdiff
path: root/lang/perl5.6/files
diff options
context:
space:
mode:
Diffstat (limited to 'lang/perl5.6/files')
-rw-r--r--lang/perl5.6/files/patch-CGI.pm15
-rw-r--r--lang/perl5.6/files/patch-Configure110
-rw-r--r--lang/perl5.6/files/patch-DynaLoader-Makefile.PL11
-rw-r--r--lang/perl5.6/files/patch-Install.pm13
-rw-r--r--lang/perl5.6/files/patch-POSIX.xs19
-rw-r--r--lang/perl5.6/files/patch-Path.pm30
-rw-r--r--lang/perl5.6/files/patch-ab13
-rw-r--r--lang/perl5.6/files/patch-ad20
-rw-r--r--lang/perl5.6/files/patch-ae18
-rw-r--r--lang/perl5.6/files/patch-freebsd.sh41
-rw-r--r--lang/perl5.6/files/patch-mg.c13
-rw-r--r--lang/perl5.6/files/patch-perl.c58
-rw-r--r--lang/perl5.6/files/use.perl258
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
generated by cgit v1.2.3 (git 2.25.1) at 2024-06-23 22:12:58 +0000