Backport 232083c091a7dd8f390a1735f72256cf82491726

diff --git a/U/perl/Extensions.U b/U/perl/Extensions.U
index d43c0d8..0678263 100644 (file)
--- a/U/perl/Extensions.U
+++ b/U/perl/Extensions.U
@@ -231,12 +231,7 @@ for xxx in $known_extensions ; do
                ;;
        Socket|socket)
                case "$d_socket" in
-               true|$define|y)
-                   case "$osname" in
-                   beos) ;; # not unless BONE
-                   *) avail_ext="$avail_ext $xxx" ;;
-                   esac
-                   ;;
+               true|$define|y) avail_ext="$avail_ext $xxx" ;;
                esac
                ;;
        Sys/Syslog|sys/syslog)

diff --git a/U/perl/dlsrc.U b/U/perl/dlsrc.U
index a6b7b2a..ae39796 100644 (file)
--- a/U/perl/dlsrc.U
+++ b/U/perl/dlsrc.U
@@ -229,7 +229,6 @@ use no flags, say "none".
 EOM
     case "$lddlflags" in
     '') case "$osname" in
-                       beos) dflt='-nostart' ;;
                        haiku) dflt='-shared' ;;
                        hpux) dflt='-b';
                              case "$gccversion" in

diff --git a/U/perl/libperl.U b/U/perl/libperl.U
index 131576a..e38ce23 100644 (file)
--- a/U/perl/libperl.U
+++ b/U/perl/libperl.U
@@ -62,7 +62,7 @@ $undef)
        ;;
 *)     case "$useshrplib" in
        '')     case "$osname" in
-               svr4*|nonstopux|dgux|dynixptx|esix|powerux|beos|haiku|cygwin*)
+               svr4*|nonstopux|dgux|dynixptx|esix|powerux|haiku|cygwin*)
                        dflt=y
                        also='Building a shared libperl is required for dynamic loading to work on your system.'
                        ;;
@@ -233,9 +233,6 @@ if "$useshrplib"; then
        next)
                # next doesn't like the default...
                ;;
-       beos)
-               # beos doesn't like the default, either.
-               ;;
        haiku)
                # Haiku doesn't like the default, either.
                ;;