projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
multiple payment options (echeck fixes), RT#23741
[freeside.git]
/
fs_selfservice
/
fs_passwd_test
diff --git
a/fs_selfservice/fs_passwd_test
b/fs_selfservice/fs_passwd_test
index
77782e6
..
4f8b8a8
100755
(executable)
--- a/
fs_selfservice/fs_passwd_test
+++ b/
fs_selfservice/fs_passwd_test
@@
-3,12
+3,17
@@
use strict;
use FS::SelfService qw(passwd);
use strict;
use FS::SelfService qw(passwd);
-my $
error
= passwd(
+my $
rv
= passwd(
'username' => 'ivan',
'old_password' => 'heyhoo',
'new_password' => 'haloo',
);
'username' => 'ivan',
'old_password' => 'heyhoo',
'new_password' => 'haloo',
);
+my $error = $rv->{error};
-die $error if $error;
+if ( $error eq 'Incorrect password.' ) {
+ exit;
+} else {
+ die $error if $error;
+ die "no error";
+}
-print "password changed sucessfully\n";