Configure: Avoid dashes in names of variables.

diff --git a/ucw/perl/Configure.pm b/ucw/perl/Configure.pm
index 69fe3ea9ff4fa2ba90f5d4ce9fdb26f93803751f..01762422ab5c040aac50c2cad2ae00da33cb2227 100644 (file)
--- a/ucw/perl/Configure.pm
+++ b/ucw/perl/Configure.pm
@@ -275,7 +275,7 @@ sub TrivConfig($@) {
        my $want = $opts{want};
        defined $want or $want = ["cflags", "libs"];
        for my $w (@$want) {
-               my $uw = $w; $uw =~ tr/a-z/A-Z/;
+               my $uw = $w; $uw =~ tr/a-z-/A-Z_/;
                my $cf = TryCmd("$pc --$w");
                Set("${upper}_${uw}" => $cf) if defined $cf;
        }