From d0d51b5bfe20db1715dc408053129c4a344ff061 Mon Sep 17 00:00:00 2001
From: Martin Mares <mj@ucw.cz>
Date: Sun, 27 Jul 2008 14:59:47 +0200
Subject: [PATCH] Configure: Avoid dashes in names of variables.

---
 ucw/perl/Configure.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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;
 	}
-- 
2.39.2