Revert #29453

p4raw-id: //depot/metaconfig@29460

diff --git a/U/perl/Extensions.U b/U/perl/Extensions.U
index e9e6eda..095e40a 100644 (file)
--- a/U/perl/Extensions.U
+++ b/U/perl/Extensions.U
@@ -74,28 +74,24 @@ nonxs_extensions=''
 : NOTE: recursion limit of 10 to prevent runaway in case of symlink madness
 find_extensions='
     for xxx in *; do
-       if $test "$1" = Compress/IO/ ; then
-           nonxs_extensions="$nonxs_extensions IO/Compress/$xxx";
-       else
-           case "$xxx" in
-               DynaLoader|dynaload) ;;
-               *)
-               if $test -f $xxx/$xxx.xs; then
-                   known_extensions="$known_extensions $1$xxx";
-               elif $test -f $xxx/Makefile.PL; then
-                   nonxs_extensions="$nonxs_extensions $1$xxx";
-               else
-                   if $test -d $xxx -a $# -lt 10; then
-                       set $1$xxx/ $*;
-                       cd "$xxx";
-                       eval $find_extensions;
-                       cd ..;
-                       shift;
-                   fi;
-               fi
-               ;;
-           esac;
-       fi
+       case "$xxx" in
+           DynaLoader|dynaload) ;;
+           *)
+           if $test -f $xxx/$xxx.xs; then
+               known_extensions="$known_extensions $1$xxx";
+           elif $test -f $xxx/Makefile.PL; then
+               nonxs_extensions="$nonxs_extensions $1$xxx";
+           else
+               if $test -d $xxx -a $# -lt 10; then
+                   set $1$xxx/ $*;
+                   cd "$xxx";
+                   eval $find_extensions;
+                   cd ..;
+                   shift;
+               fi;
+           fi
+           ;;
+       esac;
     done'
 tdir=`pwd`
 cd "$rsrc/ext"