From 9d722730eba9b3d03b6a68615e99d5de9b830111 Mon Sep 17 00:00:00 2001 From: steve Date: Sat, 14 Dec 2002 11:17:27 +0000 Subject: add email address to shellcommands --- fs_selfservice/FS-SelfService/SelfService.pm | 9 +++++++++ fs_selfservice/freeside-selfservice-server | 1 + 2 files changed, 10 insertions(+) (limited to 'fs_selfservice') diff --git a/fs_selfservice/FS-SelfService/SelfService.pm b/fs_selfservice/FS-SelfService/SelfService.pm index 9019ea4f8..da9a9fa06 100644 --- a/fs_selfservice/FS-SelfService/SelfService.pm +++ b/fs_selfservice/FS-SelfService/SelfService.pm @@ -22,7 +22,16 @@ $socket = "/usr/local/freeside/selfservice_socket"; 'login' => 'MyAccount/login', 'customer_info' => 'MyAccount/customer_info', 'invoice' => 'MyAccount/invoice', + 'start' => 'MyAccount/start', + 'update' => 'MyAccount/update', + 'collect' => 'MyAccount/collect', + 'cancel' => 'MyAccount/cancel', + 'uncancel' => 'MyAccount/uncancel', + 'getinfo' => 'MyAccount/getinfo', + 'charge' => 'MyAccount/charge', + 'new_customer' => 'MyAccount/new_customer', ); + @EXPORT_OK = keys %autoload; $ENV{'PATH'} ='/usr/bin:/usr/ucb:/bin'; diff --git a/fs_selfservice/freeside-selfservice-server b/fs_selfservice/freeside-selfservice-server index e55ca4984..c167c7a4a 100644 --- a/fs_selfservice/freeside-selfservice-server +++ b/fs_selfservice/freeside-selfservice-server @@ -19,6 +19,7 @@ use Net::SSH qw(sshopen2); use FS::UID qw(adminsuidsetup forksuidsetup); use FS::ClientAPI; +$ENV{SELFSERVICE_SERVER} = 'TRUE'; $Debug = 2; # >= 2 will log packet contents, including potentially compromising # information -- cgit v1.2.1