X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=fs_selfservice%2FFS-SelfService%2Fcgi%2Fselfservice.cgi;h=b008fbf8b4ab8d92ad05a92970f15292fcc319e6;hb=bb22f46481173b008fc9cb98b108ef1da9c1dc4d;hp=5c0190f96c43fb39fc85026f657c501961da00c7;hpb=dd03181dde5f641d81b5e50643bbd0f81ca09877;p=freeside.git diff --git a/fs_selfservice/FS-SelfService/cgi/selfservice.cgi b/fs_selfservice/FS-SelfService/cgi/selfservice.cgi index 5c0190f96..b008fbf8b 100755 --- a/fs_selfservice/FS-SelfService/cgi/selfservice.cgi +++ b/fs_selfservice/FS-SelfService/cgi/selfservice.cgi @@ -124,14 +124,16 @@ unless ( $nologin_actions{$action} ) { 'email' => $email, 'password' => $password ); + if ( $login_rv->{'error'} ) { my $ip = $cgi->remote_addr(); - warn("login failure [email $email] [ip $ip]"); + warn("login failure [email $email] [ip $ip] [error $login_rv->{error}]"); } else { #successful login - $session_id = $login_rv->{'session_id'}; } + $session_id = $login_rv->{'session_id'}; + } else { $cgi->param('username') =~ /^\s*([a-z0-9_\-\.\&]{0,$form_max})\s*$/i; @@ -312,6 +314,7 @@ sub process_change_pay { 'error' => 'Postal or email required.', }; } + _process_change_info( 'change_pay', @list ); } @@ -933,11 +936,17 @@ sub delete_svc { } sub view_usage { - list_svcs( + my $res = list_svcs( 'session_id' => $session_id, 'svcdb' => [ 'svc_acct', 'svc_phone', 'svc_port', ], 'ncancelled' => 1, ); + if ($res->{hide_usage}) { + $action = 'myaccount'; + return myaccount(); + } else { + return $res; + } } sub real_port_graph {