Properly scan for the subextensions of Encode

when doing static builds.

p4raw-id: //depot/perl@15472

diff --git a/Configure b/Configure
index 2413173..e0d01b6 100755 (executable)
--- a/Configure
+++ b/Configure
@@ -20,7 +20,7 @@
 
 # $Id: Head.U,v 3.0.1.9 1997/02/28 15:02:09 ram Exp $
 #
-# Generated on Sun Mar 24 20:31:34 EET 2002 [metaconfig 3.0 PL70]
+# Generated on Sun Mar 24 22:43:10 EET 2002 [metaconfig 3.0 PL70]
 # (with additional metaconfig patches by perlbug@perl.org)
 
 cat >c1$$ <<EOF
@@ -19453,9 +19453,7 @@ eval $find_extensions
 # Special case:  Add in threads/shared since it is not picked up by the
 # recursive find above (and adding in general recursive finding breaks
 # SDBM_File/sdbm).  A.D.  10/25/2001.
-# Encode::XX need explicit mentions for the same reason.
-# --jhi 2002-03-04
-known_extensions="$known_extensions threads/shared Encode/CN Encode/JP Encode/KR Encode/TW"
+known_extensions="$known_extensions threads/shared"
 set X $nonxs_extensions
 shift
 nonxs_extensions="$*"
@@ -19680,6 +19678,16 @@ EOM
        : Exclude those that are not xs extensions
        case "$dflt" in
        '')     dflt=none;;
+        *)  case " $dflt " in
+            *" Encode "*) # Add the subextensions of Encode
+                cd "$rsrc/ext"
+                for xxx in `ls Encode/*/*.xs|awk -F/ '{print $2}'`; do
+                        dflt="$dflt Encode/$xxx"
+                done
+                cd "$tdir"
+                ;;
+            esac
+            ;;
        esac
        rp="What extensions do you wish to include?"
        . ./myread