romenskiy2012/curl
1
0
Fork 0
mirror of https://github.com/curl/curl.git synced 2026-06-18 02:05:37 +03:00
Code Issues Projects Releases Packages Wiki Activity

runtests: match keywords case insensitively

Browse source
This commit is contained in:
Daniel Stenberg 2017-08-14 23:05:11 +02:00
parent adc35a4f19
commit 5c2aac7162
No known key found for this signature in database
GPG key ID: 5CC908FDB71E12C2
1 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

6
tests/runtests.pl
View file

@ -3585,9 +3585,9 @@ sub singletest {
for $k (@keywords) { for $k (@keywords) {
chomp $k; chomp $k;
if ($disabled_keywords{$k}) { if ($disabled_keywords{lc($k)}) {
$why = "disabled by keyword"; $why = "disabled by keyword";
} elsif ($enabled_keywords{$k}) { } elsif ($enabled_keywords{lc($k)}) {
$match = 1; $match = 1;
} }
} }
@ -5382,7 +5382,7 @@ EOHELP
$disabled_keywords{$1}=$1; $disabled_keywords{$1}=$1;
} }
elsif($ARGV[0] =~ /^([-[{a-zA-Z].*)/) { elsif($ARGV[0] =~ /^([-[{a-zA-Z].*)/) {
$enabled_keywords{$1}=$1; $enabled_keywords{lc($1)}=$1;
} }
else { else {
print "Unknown option: $ARGV[0]\n"; print "Unknown option: $ARGV[0]\n";