Changeset 1800 for trunk/LATMOS-Accounts/lib/LATMOS/Accounts
- Timestamp:
- 06/28/16 16:17:07 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/objects.pm
r1791 r1800 817 817 my @results = $class->_search_uniq_filter($base, $attr, $operator, $val); 818 818 819 $results->{$attr} = {}; 819 820 $results->{$attr}{$_} = 1 foreach (@results) 820 821 } … … 850 851 851 852 # We detect if we can do a very quick search: 852 my $forRef = $operator eq '=' && ! grep { $_ eq '*' or $_ eq '&&' or $_ eq 'NULL' } @values;853 my $forRef = $operator eq '=' && scalar(@values) > 1 && ! grep { $_ eq '*' or $_ eq '&&' or $_ eq 'NULL' } @values; 853 854 if ($forRef) { 854 855 # Improv perf
Note: See TracChangeset
for help on using the changeset viewer.