diff options
author | ivan <ivan> | 2003-10-07 06:03:16 +0000 |
---|---|---|
committer | ivan <ivan> | 2003-10-07 06:03:16 +0000 |
commit | 238e5ca1bd82575e979cd636c1330b8542fe0c3d (patch) | |
tree | 6f44927a23c6dd120cf51a1517ae9339f8d5d8f8 | |
parent | 9334e9215f704ea4bc60f952da57df069d3bcf68 (diff) |
fix subroutine call from UpdateAccountSettings sub
-rw-r--r-- | FS/FS/part_export/communigate_pro.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/FS/FS/part_export/communigate_pro.pm b/FS/FS/part_export/communigate_pro.pm index a9d9591ca..4240618ac 100644 --- a/FS/FS/part_export/communigate_pro.pm +++ b/FS/FS/part_export/communigate_pro.pm @@ -109,7 +109,7 @@ sub CreateAccount { #externalFlag => $externalFlag, push @args, externalFlag => $externalFlag if $externalFlag; - communigate_pro_command( $machine, $port, $login, $password, $method, @args ); + &communigate_pro_command( $machine, $port, $login, $password, $method, @args); } @@ -118,7 +118,7 @@ sub UpdateAccountSettings { my $accountName = delete $args{'accountName'}; $args{'AccessModes'} = [ split(' ', $args{'AccessModes'}) ]; @args = ( $accountName, \%args ); - communigate_pro_command( $machine, $port, $login, $password, $method, @args ); + &communigate_pro_command( $machine, $port, $login, $password, $method, @args); } sub communigate_pro_command { #subroutine, not method |