mirror of
https://github.com/DBD-SQLite/DBD-SQLite
synced 2025-06-07 14:19:10 -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";
|
||||
|
||||
$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} : $@";
|
||||
|
||||
# position the cursor to the first matching row (or to eof)
|
||||
|
|
Loading…
Add table
Reference in a new issue