From: Nicholas Clark <nick@ccl4.org>
Date: Thu, 25 Nov 2004 21:00:56 +0000 (+0000)
Subject: Make $Config{libs_nolargefiles} and
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=a6ea97718dffb91a71a91992c89ec1a939d696f3;p=p5sagit%2Fp5-mst-13.2.git

Make $Config{libs_nolargefiles} and
$Config{libswanted_nolargefiles} work. (For the first time)

p4raw-id: //depot/perl@23536
---

diff --git a/configpm b/configpm
index edd0844..c1c3922 100755
--- a/configpm
+++ b/configpm
@@ -299,11 +299,11 @@ sub fetch_virtual {
 		    my @libs = grep { /^-l(.+)/ &&
                                       not exists $lflibswanted{$1} }
 		                    split(' ', $Config{libs});
-		    $Config{libs} = join(' ', @libs);
+		    $value = join(' ', @libs);
 		} elsif ($new_key =~ /^libswanted_/) {
 		    my @libswanted = grep { not exists $lflibswanted{$_} }
 		                          split(' ', $Config{libswanted});
-		    $Config{libswanted} = join(' ', @libswanted);
+		    $value = join(' ', @libswanted);
 		}
 	    }
 	}
diff --git a/lib/Config.t b/lib/Config.t
index df2b55d..352cbc7 100644
--- a/lib/Config.t
+++ b/lib/Config.t
@@ -205,7 +205,8 @@ is($Config{sig_num_init}  =~ tr/,/,/, $Config{sig_size}, "sig_num_init size");
 is($Config{sig_name_init} =~ tr/,/,/, $Config{sig_size}, "sig_name_init size");
 
 # Test the troublesome virtual stuff
-my @virtual = qw(byteorder ccflags_nolargefiles);
+my @virtual = qw(byteorder ccflags_nolargefiles ldflags_nolargefiles
+		 libs_nolargefiles libswanted_nolargefiles);
 
 foreach my $pain (@virtual) {
   # No config var is named with anything that is a regexp metachar