From: Martin Mares <mj@ucw.cz>
Date: Tue, 12 Apr 2005 21:25:49 +0000 (+0000)
Subject: Fixed bug in parsing of options.
X-Git-Tag: holmes-import~795
X-Git-Url: http://mj.ucw.cz/gitweb/?a=commitdiff_plain;h=170bd8c4f65e0d5dab61638af5d5db1ece15c9d0;p=libucw.git

Fixed bug in parsing of options.
---

diff --git a/lib/perl/Configure.pm b/lib/perl/Configure.pm
index f251ce62..b16d15a8 100644
--- a/lib/perl/Configure.pm
+++ b/lib/perl/Configure.pm
@@ -124,7 +124,7 @@ sub Init($$) {
 		} elsif ($x =~ /^(\w+)$/) {
 			Override($1 => 1);
 		} else {
-			print STDERR "Invalid option $_\n";
+			print STDERR "Invalid option $x\n";
 			exit 1;
 		}
 	}