freeside/FS/FS/ClientAPI Agent.pm,1.4,1.5 MyAccount.pm,1.32,1.33 Signup.pm,1.19,1.20 passwd.pm,1.5,1.6

ivan ivan at pouncequick.420.am
Sat Feb 5 15:39:46 PST 2005


Update of /home/cvs/cvsroot/freeside/FS/FS/ClientAPI
In directory pouncequick:/tmp/cvs-serv8623/ClientAPI

Modified Files:
	Agent.pm MyAccount.pm Signup.pm passwd.pm 
Log Message:
remove unnecessary complication from ClientAPI dispatch foo

Index: Signup.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/ClientAPI/Signup.pm,v
retrieving revision 1.19
retrieving revision 1.20
diff -u -d -r1.19 -r1.20
--- Signup.pm	5 Feb 2005 01:30:55 -0000	1.19
+++ Signup.pm	5 Feb 2005 23:39:43 -0000	1.20
@@ -16,12 +16,6 @@
 use FS::queue;
 use FS::reg_code;
 
-#use FS::ClientAPI; #hmm
-FS::ClientAPI->register_handlers(
-  'Signup/signup_info'  => \&signup_info,
-  'Signup/new_customer' => \&new_customer,
-);
-
 sub signup_info {
   my $packet = shift;
 

Index: Agent.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/ClientAPI/Agent.pm,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- Agent.pm	5 Feb 2005 01:30:55 -0000	1.4
+++ Agent.pm	5 Feb 2005 23:39:43 -0000	1.5
@@ -10,14 +10,6 @@
 use FS::agent;
 use FS::cust_main qw(smart_search);
 
-#use FS::ClientAPI;
-FS::ClientAPI->register_handlers(
-  'Agent/agent_login'          => \&agent_login,
-  'Agent/agent_logout'         => \&agent_logout,
-  'Agent/agent_info'           => \&agent_info,
-  'Agent/agent_list_customers' => \&agent_list_customers,
-);
-
 #store in db?
 my $cache = new Cache::SharedMemoryCache( {
    'namespace' => 'FS::ClientAPI::Agent',

Index: MyAccount.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/ClientAPI/MyAccount.pm,v
retrieving revision 1.32
retrieving revision 1.33
diff -u -d -r1.32 -r1.33
--- MyAccount.pm	5 Feb 2005 01:30:55 -0000	1.32
+++ MyAccount.pm	5 Feb 2005 23:39:43 -0000	1.33
@@ -19,27 +19,6 @@
 use FS::cust_main_county;
 use FS::cust_pkg;
 
-#use FS::ClientAPI; #hmm
-FS::ClientAPI->register_handlers(
-  'MyAccount/login'              => \&login,
-  'MyAccount/logout'             => \&logout,
-  'MyAccount/customer_info'      => \&customer_info,
-  'MyAccount/edit_info'          => \&edit_info,
-  'MyAccount/invoice'            => \&invoice,
-  'MyAccount/list_invoices'      => \&list_invoices,
-  'MyAccount/cancel'             => \&cancel,
-  'MyAccount/payment_info'       => \&payment_info,
-  'MyAccount/process_payment'    => \&process_payment,
-  'MyAccount/list_pkgs'          => \&list_pkgs,
-  'MyAccount/order_pkg'          => \&order_pkg,
-  'MyAccount/cancel_pkg'         => \&cancel_pkg,
-  'MyAccount/charge'             => \&charge,
-  'MyAccount/part_svc_info'      => \&part_svc_info,
-  'MyAccount/provision_acct'     => \&provision_acct,
-  'MyAccount/provision_external' => \&provision_external,
-  'MyAccount/unprovision_svc'    => \&unprovision_svc,
-);
-
 use vars qw( @cust_main_editable_fields );
 @cust_main_editable_fields = qw(
   first last company address1 address2 city

Index: passwd.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/ClientAPI/passwd.pm,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -d -r1.5 -r1.6
--- passwd.pm	5 Feb 2005 01:30:55 -0000	1.5
+++ passwd.pm	5 Feb 2005 23:39:43 -0000	1.6
@@ -5,13 +5,6 @@
 use FS::svc_acct;
 use FS::svc_domain;
 
-#use FS::ClientAPI; #hmm
-FS::ClientAPI->register_handlers(
-  'passwd/passwd' => \&passwd,
-  'passwd/chfn' => \&chfn,
-  'passwd/chsh' => \&chsh,
-);
-
 sub passwd {
   my $packet = shift;
 




More information about the freeside-commits mailing list