fix username check, RT#9608

diff --git a/FS/FS/ClientAPI/Agent.pm b/FS/FS/ClientAPI/Agent.pm
index 3f95947..923920d 100644 (file)
--- a/FS/FS/ClientAPI/Agent.pm
+++ b/FS/FS/ClientAPI/Agent.pm
@@ -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'     => '',