X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=fs_selfservice%2FFS-SelfService%2Fcgi%2Fselfservice.cgi;h=2a8b2b6c4dacad99cc544fbdd9842f64fd20ada3;hb=b89a12ddfcdf3f1da02e42765a04e40059a71b5d;hp=1b728e2f9ef4a87f240cc88b1b30d605964afa17;hpb=9c16c12de0c9570e69f67a1640803c91b5ea53a8;p=freeside.git diff --git a/fs_selfservice/FS-SelfService/cgi/selfservice.cgi b/fs_selfservice/FS-SelfService/cgi/selfservice.cgi index 1b728e2f9..2a8b2b6c4 100755 --- a/fs_selfservice/FS-SelfService/cgi/selfservice.cgi +++ b/fs_selfservice/FS-SelfService/cgi/selfservice.cgi @@ -23,6 +23,7 @@ use FS::SelfService qw( mason_comp port_graph start_thirdparty finish_thirdparty reset_passwd check_reset_passwd process_reset_passwd + billing_history ); $template_dir = '.'; @@ -82,6 +83,7 @@ my @actions = ( qw( process_change_password customer_suspend_pkg process_suspend_pkg + history )); my @nologin_actions = (qw( @@ -339,6 +341,10 @@ sub invoices { list_invoices( 'session_id' => $session_id, ); } +sub history { + billing_history( 'session_id' => $session_id, ); +} + sub tktcreate { my $customer_info = customer_info( 'session_id' => $session_id ); return $customer_info if ( $customer_info->{'error'} );