Fix case-sensitivity bug in parser for IN expression (#165).

kasei · Nov 13, 2019 · 7956e4f · 7956e4f
1 parent 2db05bf
commit 7956e4f
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/RDF-Query/lib/RDF/Query/Parser/SPARQL11.pm b/RDF-Query/lib/RDF/Query/Parser/SPARQL11.pm
@@ -2841,9 +2841,9 @@ sub _RelationalExpression {
 		$self->_NumericExpression;
 		push(@list, splice(@{ $self->{stack} }));
 		$self->_add_stack( $self->new_binary_expression( $op, @list ) );
-	} elsif ($self->_test(qr/(NOT )?IN/)) {
+	} elsif ($self->_test(qr/(NOT )?IN/i)) {
 		my @list	= splice(@{ $self->{stack} });
-		my $op		= lc($self->_eat(qr/(NOT )?IN/));
+		my $op		= lc($self->_eat(qr/(NOT )?IN/i));
 		$op			=~ s/\s+//g;
 		$self->__consume_ws_opt;
 		$self->_ExpressionList();