wwww: Fix escape_like() to also escape backslash
This commit is contained in:
parent
e69850d100
commit
29a6f784f5
1 changed files with 1 additions and 1 deletions
|
|
@ -76,7 +76,7 @@ sub normalize_name { $_[0] =~ s/%5b/[/irg =~ s/%5d/]/irg =~ s/%20/ /rg }
|
||||||
# Subquery returning all packages that have a man page.
|
# Subquery returning all packages that have a man page.
|
||||||
my $packages_with_man = '(SELECT * FROM packages p WHERE EXISTS(SELECT 1 FROM package_versions pv WHERE pv.package = p.id AND EXISTS(SELECT 1 FROM man m WHERE m.package = pv.id)))';
|
my $packages_with_man = '(SELECT * FROM packages p WHERE EXISTS(SELECT 1 FROM package_versions pv WHERE pv.package = p.id AND EXISTS(SELECT 1 FROM man m WHERE m.package = pv.id)))';
|
||||||
|
|
||||||
sub escape_like { $_[0] =~ s/([_%])/\\$1/rg }
|
sub escape_like { $_[0] =~ s/([_%\\])/\\$1/rg }
|
||||||
|
|
||||||
sub sql_join {
|
sub sql_join {
|
||||||
my $sep = shift;
|
my $sep = shift;
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue