diff options
| author | ivan <ivan> | 2002-02-22 05:56:48 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2002-02-22 05:56:48 +0000 |
| commit | ce4d2cc94fed25fc3b4aa85531022ae1e6eed778 (patch) | |
| tree | 93c3c4e601651093e9ea81cbce1d8dd7a6c93b87 | |
| parent | 4dbbbee37e78a035022974d19b3b80aeaead6049 (diff) | |
fix bugs in CP mailbox changes: cp_change and cp_rename
| -rw-r--r-- | FS/FS/svc_acct.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/FS/FS/svc_acct.pm b/FS/FS/svc_acct.pm index 2f327a3d3..20db38b71 100644 --- a/FS/FS/svc_acct.pm +++ b/FS/FS/svc_acct.pm @@ -809,7 +809,7 @@ sub icradius_rc_replace { } sub cp_rename { - my ( $old_username, $new_username ); + my ( $old_username, $new_username ) = @_; my $app = new Net::APP ( $cp_server, User => $cp_user, @@ -830,7 +830,7 @@ sub cp_rename { } sub cp_change { - my ( $username, $password ); + my ( $username, $password ) = @_; my $app = new Net::APP ( $cp_server, User => $cp_user, |