X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2FClientAPI_XMLRPC.pm;h=48b94eba28fa2841315f3e66ddf19eb90a05f65d;hp=138ad06a4b5d8d9df6ff75d8700f1b0fd1263f4d;hb=d7eafc9c9aae2bf47ea19a56cc5bb1380c5874e4;hpb=0275abc52827599c9d1ee028cf88e1eb30473948 diff --git a/FS/FS/ClientAPI_XMLRPC.pm b/FS/FS/ClientAPI_XMLRPC.pm index 138ad06a4..48b94eba2 100644 --- a/FS/FS/ClientAPI_XMLRPC.pm +++ b/FS/FS/ClientAPI_XMLRPC.pm @@ -49,7 +49,7 @@ sub AUTOLOAD { #no strict 'refs'; #&{$call}(@_); #FS::ClientAPI->dispatch($autoload->{$call}, @_); - FS::ClientAPI->dispatch($autoload->{$call}, { @_ } ); + FS::ClientAPI->dispatch($autoload->{$call}, @_ ); }else{ die "No such procedure: $call"; } @@ -91,6 +91,7 @@ sub ss2clientapi { 'renew_info' => 'MyAccount/renew_info', 'order_renew' => 'MyAccount/order_renew', 'cancel_pkg' => 'MyAccount/cancel_pkg', #add to ss cgi! + 'suspend_pkg' => 'MyAccount/suspend_pkg', #add to ss cgi! 'charge' => 'MyAccount/charge', #? 'part_svc_info' => 'MyAccount/part_svc_info', 'provision_acct' => 'MyAccount/provision_acct', @@ -104,6 +105,7 @@ sub ss2clientapi { 'domain_select_hash' => 'Signup/domain_select_hash', # expose? 'new_customer' => 'Signup/new_customer', 'capture_payment' => 'Signup/capture_payment', + 'clear_signup_cache' => 'Signup/clear_cache', 'agent_login' => 'Agent/agent_login', 'agent_logout' => 'Agent/agent_logout', 'agent_info' => 'Agent/agent_info',