summaryrefslogtreecommitdiff
path: root/FS/FS/ClientAPI/Signup.pm
diff options
context:
space:
mode:
Diffstat (limited to 'FS/FS/ClientAPI/Signup.pm')
-rw-r--r--FS/FS/ClientAPI/Signup.pm11
1 files changed, 10 insertions, 1 deletions
diff --git a/FS/FS/ClientAPI/Signup.pm b/FS/FS/ClientAPI/Signup.pm
index 26d3612cb..2eefcf8d9 100644
--- a/FS/FS/ClientAPI/Signup.pm
+++ b/FS/FS/ClientAPI/Signup.pm
@@ -26,6 +26,15 @@ use FS::payby;
$DEBUG = 0;
$me = '[FS::ClientAPI::Signup]';
+sub clear_cache {
+ warn "$me clear_cache called\n" if $DEBUG;
+ my $cache = new FS::ClientAPI_SessionCache( {
+ 'namespace' => 'FS::ClientAPI::Signup',
+ } );
+ $cache->clear();
+ return {};
+}
+
sub signup_info {
my $packet = shift;
@@ -90,7 +99,7 @@ sub signup_info {
],
'agent' => [ map { my $agent = $_;
- { map { $_ => $agent->get($_) } @agent_fields }
+ +{ map { $_ => $agent->get($_) } @agent_fields }
}
qsearch('agent', { 'disabled' => '' } )
],