summaryrefslogtreecommitdiff
path: root/FS/FS/cust_pkg/Import.pm
diff options
context:
space:
mode:
Diffstat (limited to 'FS/FS/cust_pkg/Import.pm')
-rw-r--r--FS/FS/cust_pkg/Import.pm4
1 files changed, 3 insertions, 1 deletions
diff --git a/FS/FS/cust_pkg/Import.pm b/FS/FS/cust_pkg/Import.pm
index 9c93677..fe69f82 100644
--- a/FS/FS/cust_pkg/Import.pm
+++ b/FS/FS/cust_pkg/Import.pm
@@ -170,8 +170,9 @@ sub batch_import {
my $format = delete $opt->{'format'};
my @fields = ();
- if ( $format =~ /^(.*)-agent_custid$/ ) {
+ if ( $format =~ /^(.*)-agent_custid(-agent_pkgid)?$/ ) {
$format = $1;
+ my $agent_pkgid = $2;
@fields = (
sub {
my( $self, $value ) = @_; # $conf, $param
@@ -182,6 +183,7 @@ sub batch_import {
$self->custnum($cust_main->custnum) if $cust_main;
},
);
+ push @fields, 'agent_pkgid' if $agent_pkgid;
} else {
@fields = ( 'custnum' );
}