diff options
| author | ivan <ivan> | 2002-07-16 12:28:02 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2002-07-16 12:28:02 +0000 |
| commit | 6ff02eb18af2dd61ce2dca064414ca183fa02e6e (patch) | |
| tree | d1ef22718ad3cc2cd34116e9f56655441ed47592 /fs_selfservice/fs_passwd_test | |
| parent | 2db0b73231b1cc8b9203d8c482ea9da2973f2768 (diff) | |
invoice viewing...
Diffstat (limited to 'fs_selfservice/fs_passwd_test')
| -rwxr-xr-x | fs_selfservice/fs_passwd_test | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/fs_selfservice/fs_passwd_test b/fs_selfservice/fs_passwd_test index c6a297968..4f8b8a888 100755 --- a/fs_selfservice/fs_passwd_test +++ b/fs_selfservice/fs_passwd_test @@ -3,11 +3,12 @@ use strict; use FS::SelfService qw(passwd); -my $error = passwd( +my $rv = passwd( 'username' => 'ivan', 'old_password' => 'heyhoo', 'new_password' => 'haloo', ); +my $error = $rv->{error}; if ( $error eq 'Incorrect password.' ) { exit; |