From: Martin Mares <mj@ucw.cz>
Date: Sun, 27 Jul 2008 12:59:47 +0000 (+0200)
Subject: Configure: Avoid dashes in names of variables.
X-Git-Tag: holmes-import~364
X-Git-Url: http://mj.ucw.cz/gitweb/?a=commitdiff_plain;h=d0d51b5bfe20db1715dc408053129c4a344ff061;p=libucw.git

Configure: Avoid dashes in names of variables.
---

diff --git a/ucw/perl/Configure.pm b/ucw/perl/Configure.pm
index 69fe3ea9..01762422 100644
--- 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;
 	}