From 9d1a4c0589b1588ef4cbabaae70e19946de7212b Mon Sep 17 00:00:00 2001 From: Ian Jackson Date: Wed, 28 Oct 2009 15:32:20 +0000 Subject: [PATCH] Fix another case sensitivity error --- yarrg/web/check_capacitystring | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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; -- 2.30.2