stray closing /TABLE in the no-ticket case

[freeside.git] / FS / FS / ClientAPI / Agent.pm

diff --git a/FS/FS/ClientAPI/Agent.pm b/FS/FS/ClientAPI/Agent.pm
index 3f95947..baa05ca 100644 (file)
--- a/FS/FS/ClientAPI/Agent.pm
+++ b/FS/FS/ClientAPI/Agent.pm
@@ -140,7 +140,7 @@ sub agent_list_customers {
                          my $cust_main = $_;
                          my $hashref = $cust_main->hashref;
                          $hashref->{$_} = $cust_main->$_()
-                           foreach qw(name status statuscolor);
+                           foreach qw(name status statuscolor status_label);
                          delete $hashref->{$_} foreach qw( payinfo paycvv );
                          $hashref;
                    } @cust_main
@@ -151,7 +151,7 @@ sub agent_list_customers {
 
 sub check_username {
   my $p = shift;
-  my($session, $agentnum, $svc_acct) = _session_agentnum_svc_acct_check($p);
+  my($session, $agentnum, $svc_acct) = _session_agentnum_svc_acct($p);
   return { 'error' => $session } unless ref($session);
 
   { 'error'     => '',