fix subroutine call from UpdateAccountSettings sub
authorivan <ivan>
Tue, 7 Oct 2003 06:03:17 +0000 (06:03 +0000)
committerivan <ivan>
Tue, 7 Oct 2003 06:03:17 +0000 (06:03 +0000)
FS/FS/part_export/communigate_pro.pm

index a9d9591..4240618 100644 (file)
@@ -109,7 +109,7 @@ sub CreateAccount {
                #externalFlag => $externalFlag,
   push @args, externalFlag => $externalFlag if $externalFlag;
 
                #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 );
   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
 }
 
 sub communigate_pro_command { #subroutine, not method