diff options
| author | ivan <ivan> | 2003-09-10 21:45:36 +0000 | 
|---|---|---|
| committer | ivan <ivan> | 2003-09-10 21:45:36 +0000 | 
| commit | 67578fdbc842e9d4a14724c90e70a4f777ec2e03 (patch) | |
| tree | 74af3974619caa532ad3827356e7b08df174ea8a | |
| parent | c3544763d301a8f1bc2c1b5f4ea4c9b3543332d2 (diff) | |
communitgate pro CreateAccount examples are on crack
| -rw-r--r-- | FS/FS/part_export/communigate_pro.pm | 9 | 
1 files changed, 5 insertions, 4 deletions
| diff --git a/FS/FS/part_export/communigate_pro.pm b/FS/FS/part_export/communigate_pro.pm index 2370e3179..6c1f2aca2 100644 --- a/FS/FS/part_export/communigate_pro.pm +++ b/FS/FS/part_export/communigate_pro.pm @@ -88,10 +88,11 @@ 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, +            accountType  => $accountType, +            externalFlag => $externalFlag, +            settings     => \%args, +          );    communigate_pro_command( $machine, $port, $login, $password, $method, @args ); | 
