Bei Artikelsuche Groß-/Kleinschreibung ignorieren.

diff --git a/SL/IR.pm b/SL/IR.pm
index 875059bfacf397090bbb1244042671abd08481b2..98a53536f97f6f735ccb2b2252d9991370b80d53 100644 (file)
--- a/SL/IR.pm
+++ b/SL/IR.pm
@@ -1007,7 +1007,7 @@ sub retrieve_item {
   foreach my $table_column (qw(p.partnumber p.description pg.partsgroup)) {
     my $field = (split m{\.}, $table_column)[1];
     next unless $form->{"${field}_${i}"};
   foreach my $table_column (qw(p.partnumber p.description pg.partsgroup)) {
     my $field = (split m{\.}, $table_column)[1];
     next unless $form->{"${field}_${i}"};

-    $where .= " AND lower(${table_column}) LIKE ?";
+    $where .= " AND lower(${table_column}) LIKE lower(?)";

     push @values, '%' . $form->{"${field}_${i}"} . '%';
   }
 
     push @values, '%' . $form->{"${field}_${i}"} . '%';
   }