mirror of
https://github.com/DBD-SQLite/DBD-SQLite
synced 2025-06-07 22:28:47 -04:00
silenced a compile-time deprecation warning (Unescaped left brace in regex is deprecated) under bleadperl
This commit is contained in:
parent
76c4cc1cfa
commit
1cedb037a8
1 changed files with 1 additions and 1 deletions
|
@ -194,7 +194,7 @@ sub FILTER {
|
||||||
|
|
||||||
# print STDERR "PERL CODE:\n", $perl_code, "\n";
|
# print STDERR "PERL CODE:\n", $perl_code, "\n";
|
||||||
|
|
||||||
$self->{is_wanted_row} = eval $perl_code
|
$self->{is_wanted_row} = do { no warnings; eval $perl_code }
|
||||||
or die "couldn't eval q{$perl_code} : $@";
|
or die "couldn't eval q{$perl_code} : $@";
|
||||||
|
|
||||||
# position the cursor to the first matching row (or to eof)
|
# position the cursor to the first matching row (or to eof)
|
||||||
|
|
Loading…
Add table
Reference in a new issue