From: H.Merijn Brand <h.m.brand@xs4all.nl>
Date: Mon, 4 Dec 2006 18:08:05 +0000 (+0000)
Subject: Revert #29453
X-Git-Tag: 5.26.1~369
X-Git-Url: https://perl5.git.perl.org/metaconfig.git/commitdiff_plain/ba5f32a3e96addc2748ae5e459428816dd902041

Revert #29453

p4raw-id: //depot/metaconfig@29460
---

diff --git a/U/perl/Extensions.U b/U/perl/Extensions.U
index e9e6eda..095e40a 100644
--- 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"