diff options
| author | cvs2git <cvs2git> | 2009-10-11 02:42:17 +0000 |
|---|---|---|
| committer | cvs2git <cvs2git> | 2009-10-11 02:42:17 +0000 |
| commit | a83a000a027d1272e813259d09230d701d84df64 (patch) | |
| tree | 71500c957e6d7db3e1ad3d59e74ca7bbb14e44ff /FS/FS/part_export/prizm.pm | |
| parent | 097a12385d80ef52f37d4cc2bb93bc3f81e6f8e6 (diff) | |
| parent | 0b69c091543b56a45f2ae6b8718fc67f381a6686 (diff) | |
This commit was manufactured by cvs2svn to create branchfreeside_1_9_1
'FREESIDE_1_9_BRANCH'.
Diffstat (limited to 'FS/FS/part_export/prizm.pm')
| -rw-r--r-- | FS/FS/part_export/prizm.pm | 12 |
1 files changed, 9 insertions, 3 deletions
diff --git a/FS/FS/part_export/prizm.pm b/FS/FS/part_export/prizm.pm index 2d4d858..9705440 100644 --- a/FS/FS/part_export/prizm.pm +++ b/FS/FS/part_export/prizm.pm @@ -200,6 +200,9 @@ sub _export_insert { # } # } + my $performance_profile = $svc->performance_profile; + $performance_profile ||= $svc->cust_svc->cust_pkg->part_pkg->pkg; + my $element_name_length = 50; $element_name_length = $1 if $self->option('element_name_length') =~ /^\s*(\d+)\s*$/; @@ -211,7 +214,7 @@ sub _export_insert { $location, $contact, sprintf("%032X", $svc->authkey), - $svc->cust_svc->cust_pkg->part_pkg->pkg, + $performance_profile, $svc->vlan_profile, ($self->option('ems') ? 1 : 0 ), ); @@ -256,7 +259,7 @@ sub _export_insert { $err_or_som = $self->prizm_command('NetworkIfService', 'setElementConfigSet', [ $element ], - $svc->cust_svc->cust_pkg->part_pkg->pkg, + $performance_profile, 0, 1, ); @@ -395,9 +398,12 @@ sub _export_replace { return $err_or_som unless ref($err_or_som); + my $performance_profile = $new->performance_profile; + $performance_profile ||= $new->cust_svc->cust_pkg->part_pkg->pkg; + $err_or_som = $self->prizm_command('NetworkIfService', 'setElementConfigSet', [ $element ], - $new->cust_svc->cust_pkg->part_pkg->pkg, + $performance_profile, 0, 1, ); |