?X: remove any trailing -3.0 or other version identification
prog=`echo $package | $sed 's/-*[0-9.]*$//'`
case "$installstyle" in
?X: remove any trailing -3.0 or other version identification
prog=`echo $package | $sed 's/-*[0-9.]*$//'`
case "$installstyle" in
-*lib/perl5*) dflt=$siteprefix/lib/site_$prog/ ;;
+*lib/perl5*) dflt=$siteprefix/lib/site_$prog ;;
*) dflt=$siteprefix/lib/site_$prog ;;
esac
$cat <<EOM
*) dflt=$siteprefix/lib/site_$prog ;;
esac
$cat <<EOM
?RCS: Revision 1.1 1999/07/08 18:32:57 doughera
?RCS: Initial revision
?RCS:
?RCS: Revision 1.1 1999/07/08 18:32:57 doughera
?RCS: Initial revision
?RCS:
-?MAKE:vendorprefix vendorprefixexp +oldvendorprefix: Getfile Loc Oldconfig cat prefix
+?MAKE:usevendorprefix vendorprefix vendorprefixexp +oldvendorprefix: \
+ Getfile Loc Oldconfig cat prefix
?MAKE: -pick add $@ %<
?S:vendorprefix:
?S: This variable holds the full absolute path of the directory below
?MAKE: -pick add $@ %<
?S:vendorprefix:
?S: This variable holds the full absolute path of the directory below
directory rather than in the main distribution directory. This will
ease upgrades between binary-compatible maintenance versions of perl.
directory rather than in the main distribution directory. This will
ease upgrades between binary-compatible maintenance versions of perl.
-The default answer (empty) should be fine for most people.
-This causes further questions about vendor add-ons to be skipped
-and no vendor-specific directories will be configured for perl.
-
Of course you may also use these directories in whatever way you see
fit. For example, you might use them to access modules shared over a
company-wide network.
Of course you may also use these directories in whatever way you see
fit. For example, you might use them to access modules shared over a
company-wide network.
+The default answer should be fine for most people.
+This causes further questions about vendor add-ons to be skipped
+and no vendor-specific directories will be configured for perl.
+
-fn=d~+
-rp='Installation prefix to use for vendor-supplied add-ons?'
-case "$vendorprefix" in
-'') dflt='' ;;
-*) dflt=$vendorprefix ;;
+rp='Do you want to configure vendor-specific add-on directories?'
+case "$usevendorprefix" in
+define|true|[yY]*) dflt=y ;;
+*) dflt=n ;;
-. ./getfile
-oldvendorprefix=''
-case "$vendorprefix" in
-'') ;;
-*)
- case "$ans" in
- "$prefix") ;;
- *) oldvendorprefix="$prefix";;
+. ./myread
+case "$ans" in
+[yY]*) fn=d~+
+ rp='Installation prefix to use for vendor-supplied add-ons?'
+ case "$vendorprefix" in
+ '') dflt='' ;;
+ *) dflt=$vendorprefix ;;
+ . ./getfile
+ oldvendorprefix=''
+ case "$vendorprefix" in
+ '') ;;
+ *) case "$ans" in
+ "$prefix") ;;
+ *) oldvendorprefix="$prefix";;
+ esac
+ ;;
+ esac
+ usevendorprefix="$define"
+ vendorprefix="$ans"
+ vendorprefixexp="$ansexp"
+ ;;
+*) usevendorprefix="$undef"
+ vendorprefix=''
+ vendorprefixexp=''
-vendorprefix="$ans"
-vendorprefixexp="$ansexp"
You may give one or more space-separated answers, or "none" if appropriate.
A well-behaved OS will have no hints, so answering "none" or just "Policy"
You may give one or more space-separated answers, or "none" if appropriate.
A well-behaved OS will have no hints, so answering "none" or just "Policy"
-is a good thing. DO NOT give a wrong version.
+is a good thing. DO NOT give a wrong version or a wrong OS.
done'
tdir=`pwd`
cd $rsrc/ext
done'
tdir=`pwd`
cd $rsrc/ext
shift
eval $find_extensions
set X $nonxs_extensions
shift
eval $find_extensions
set X $nonxs_extensions