[freeside-commits] freeside/FS/FS/part_export sqlradius.pm, 1.48.2.1, 1.48.2.2

Ivan,,, ivan at wavetail.420.am
Tue Oct 18 11:10:32 PDT 2011


Update of /home/cvs/cvsroot/freeside/FS/FS/part_export
In directory wavetail.420.am:/tmp/cvs-serv11947

Modified Files:
      Tag: FREESIDE_2_3_BRANCH
	sqlradius.pm 
Log Message:
fix suspensions by svcnum, RT#14398

Index: sqlradius.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/part_export/sqlradius.pm,v
retrieving revision 1.48.2.1
retrieving revision 1.48.2.2
diff -u -w -d -r1.48.2.1 -r1.48.2.2
--- sqlradius.pm	17 Oct 2011 23:53:19 -0000	1.48.2.1
+++ sqlradius.pm	18 Oct 2011 18:10:29 -0000	1.48.2.2
@@ -358,7 +358,7 @@
       if (!$userspec && exists($reasonmap{$r->reason}));
   }
   my $suspend_user;
-  if ($userspec =~ /^d+$/ ){
+  if ($userspec =~ /^\d+$/ ){
     $suspend_user = qsearchs( 'svc_acct', { 'svcnum' => $userspec } );
   }elsif ($userspec =~ /^\S+\@\S+$/){
     my ($username,$domain) = split(/\@/, $userspec);



More information about the freeside-commits mailing list