diff options
Diffstat (limited to 'lang/perl5.6/files/use.perl')
| -rw-r--r-- | lang/perl5.6/files/use.perl | 91 |
1 files changed, 1 insertions, 90 deletions
diff --git a/lang/perl5.6/files/use.perl b/lang/perl5.6/files/use.perl index c5c8d71a51c0..c5300e151d8c 100644 --- a/lang/perl5.6/files/use.perl +++ b/lang/perl5.6/files/use.perl @@ -28,9 +28,6 @@ if [ "x$this" = "xuse.perl" ]; then 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 @@ -46,9 +43,6 @@ else # 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 @@ -56,25 +50,6 @@ else 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 @@ -83,7 +58,7 @@ special_link_list=" do_remove_links() { echo "Removing stale symlinks from /usr/bin..." - for binary in $link_list $special_link_list + for binary in $special_link_list do if [ -L "/usr/bin/$binary" ] ; then echo " Removing /usr/bin/$binary" @@ -106,21 +81,6 @@ do_remove_links() 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 @@ -140,50 +100,6 @@ do_create_links() 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 @@ -229,11 +145,7 @@ 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." } @@ -248,7 +160,6 @@ do_spam_manpath() [ $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 |