summaryrefslogtreecommitdiff
path: root/FS/FS/part_export/communigate_pro.pm
diff options
context:
space:
mode:
authorivan <ivan>2003-09-10 21:39:20 +0000
committerivan <ivan>2003-09-10 21:39:20 +0000
commitc3544763d301a8f1bc2c1b5f4ea4c9b3543332d2 (patch)
treedbec8e6527b4a9cfe5811b708c3e837c02df451a /FS/FS/part_export/communigate_pro.pm
parent2cafaa2750d80a3d2d71fdc98dfffde56941426b (diff)
fix for communigate pro weird data structure on create
Diffstat (limited to 'FS/FS/part_export/communigate_pro.pm')
-rw-r--r--FS/FS/part_export/communigate_pro.pm6
1 files changed, 4 insertions, 2 deletions
diff --git a/FS/FS/part_export/communigate_pro.pm b/FS/FS/part_export/communigate_pro.pm
index 4068881..2370e31 100644
--- a/FS/FS/part_export/communigate_pro.pm
+++ b/FS/FS/part_export/communigate_pro.pm
@@ -88,8 +88,10 @@ sub CreateAccount {
my $accountType = delete $args{'accountType'};
my $externalFlag = delete $args{'externalFlag'};
$args{'AccessModes'} = [ split(' ', $args{'AccessModes'}) ];
- @args = ( accountName => $accountName, [ settings => \%args ],
- accountType => $accountType, externalFlag => $externalFlag, );
+ @args = ( accountName => $accountName, [
+ settings => \%args,
+ accountType => $accountType,
+ externalFlag => $externalFlag, ] );
communigate_pro_command( $machine, $port, $login, $password, $method, @args );