diff options
Diffstat (limited to 't/lib/anydbm.t')
-rwxr-xr-x | t/lib/anydbm.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/lib/anydbm.t b/t/lib/anydbm.t index 11ac103a64..957aadafba 100755 --- a/t/lib/anydbm.t +++ b/t/lib/anydbm.t @@ -80,7 +80,7 @@ delete $h{'goner3'}; if ($#keys == 29 && $#values == 29) {print "ok 5\n";} else {print "not ok 5\n";} while (($key,$value) = each(h)) { - if ($key eq $keys[$i] && $value eq $values[$i] && $key gt $value) { + if ($key eq $keys[$i] && $value eq $values[$i] && $key eq lc($value)) { $key =~ y/a-z/A-Z/; $i++ if $key eq $value; } |