summaryrefslogtreecommitdiff
path: root/lib/VNWeb/Discussions
diff options
context:
space:
mode:
authorYorhel <git@yorhel.nl>2020-07-29 11:08:03 +0200
committerYorhel <git@yorhel.nl>2020-07-29 11:13:14 +0200
commit32b502511709afd45503779d5a1c38a1ada0f09c (patch)
tree88fcd97965eecca8a391bea81ff518b2d84a1b7f /lib/VNWeb/Discussions
parentdaef605046269bcad26525c87d3e9a653db532c6 (diff)
SQL: Fix escaping of backslash in LIKE patterns
Diffstat (limited to 'lib/VNWeb/Discussions')
-rw-r--r--lib/VNWeb/Discussions/Elm.pm2
-rw-r--r--lib/VNWeb/Discussions/Search.pm2
2 files changed, 2 insertions, 2 deletions
diff --git a/lib/VNWeb/Discussions/Elm.pm b/lib/VNWeb/Discussions/Elm.pm
index 77944926..81fe7a9b 100644
--- a/lib/VNWeb/Discussions/Elm.pm
+++ b/lib/VNWeb/Discussions/Elm.pm
@@ -9,7 +9,7 @@ elm_api Boards => undef, {
}, sub {
return elm_Unauth if !auth->permBoard;
my $q = shift->{search};
- my $qs = $q =~ s/[%_]//gr;
+ my $qs = sql_like $q;
my sub subq {
my($prio, $where) = @_;
diff --git a/lib/VNWeb/Discussions/Search.pm b/lib/VNWeb/Discussions/Search.pm
index 6b56b47b..73deba04 100644
--- a/lib/VNWeb/Discussions/Search.pm
+++ b/lib/VNWeb/Discussions/Search.pm
@@ -125,7 +125,7 @@ sub threads_ {
my $where = sql_and
$filt->{b}->@* < keys %BOARD_TYPE ? sql('t.id IN(SELECT tid FROM threads_boards WHERE type IN', $filt->{b}, ')') : (),
- map sql('t.title ilike', \('%'.($_ =~ s/%//gr).'%')), grep length($_) > 0, split /[ -,._]/, $filt->{bq};
+ map sql('t.title ilike', \('%'.sql_like($_).'%')), grep length($_) > 0, split /[ ,._-]/, $filt->{bq};
noresults_ if !threadlist_
where => $where,