MV_SHIP_MODIFIERS —
Interchange 5.9.0:
Source: lib/Vend/Ship.pm
Line 692 (context shows lines 682-696 in shipping():523)
foreach $i (0 .. $#$Vend::Items) {
my $item = $Vend::Items->[$i];
$total += (database_field($base, $item->{code}, $field) || 0) *
$item->{quantity};
}
}
else {
#::logDebug("standard field selection");
my $use_modifier;
if ($::Variable->{MV_SHIP_MODIFIERS}){
my @pieces = grep {$_ = quotemeta $_} split(/[\s,|]+/,$::Variable->{MV_SHIP_MODIFIERS});
my $regex = join('|',@pieces);
$use_modifier = 1 if ($regex && $field =~ /^($regex)$/);
}