From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Wed, 28 Oct 2009 15:32:20 +0000 (+0000)
Subject: Fix another case sensitivity error
X-Git-Tag: 5.1~1^2~1
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ijackson/git?a=commitdiff_plain;h=9d1a4c0589b1588ef4cbabaae70e19946de7212b;p=ypp-sc-tools.git

Fix another case sensitivity error
---

diff --git a/yarrg/web/check_capacitystring b/yarrg/web/check_capacitystring
index 321d754..52eab28 100644
--- a/yarrg/web/check_capacitystring
+++ b/yarrg/web/check_capacitystring
@@ -152,7 +152,7 @@ my $parse_term= sub {
 	$first_term= 0;
 };
 
-while ($string =~ s/^(.*?)(\bminus\b|-|\bplus\b|\+)//) {
+while ($string =~ s/^(.*?)(\bminus\b|-|\bplus\b|\+)//i) {
 	my ($lhs)= ($1);
 	my @nextsign= $2 =~ m/^p|^\+/ ? (+1,'+') : (-1,'-');
 	$show_answer= 1;