[freeside-commits] freeside/FS/FS/part_export sqlradius.pm, 1.23, 1.24

Jeff Finucane,420,, jeff at wavetail.420.am
Wed Jan 31 18:14:01 PST 2007


Update of /home/cvs/cvsroot/freeside/FS/FS/part_export
In directory wavetail:/tmp/cvs-serv24462/FS/FS/part_export

Modified Files:
	sqlradius.pm 
Log Message:
better solution to ticket 1455

Index: sqlradius.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/part_export/sqlradius.pm,v
retrieving revision 1.23
retrieving revision 1.24
diff -u -d -r1.23 -r1.24
--- sqlradius.pm	31 Jan 2007 18:28:51 -0000	1.23
+++ sqlradius.pm	1 Feb 2007 02:13:58 -0000	1.24
@@ -31,10 +31,7 @@
     type  => 'checkbox',
     label => 'Show the Called-Station-ID on session reports',
   },
-  'keep_password' => {
-    type  => 'checkbox',
-    label => 'Do not change the password on suspend and unsuspend events',
-  },
+  'overlimit_groups' => { label => 'Radius groups to assign to svc_acct which has exceeded its bandwidth or time limit', } ,
   'groups_susp_reason' => { label =>
                              'Radius group mapping to reason (via template user)',
                             type  => 'textarea',
@@ -205,9 +202,8 @@
 sub _export_suspend {
   my( $self, $svc_acct ) = (shift, shift);
 
-  my $new = $self->option('keep_password') ? $svc_acct
-                            : $svc_acct->clone_suspended;
-
+  my $new = $svc_acct->clone_suspended;
+  
   local $SIG{HUP} = 'IGNORE';
   local $SIG{INT} = 'IGNORE';
   local $SIG{QUIT} = 'IGNORE';



More information about the freeside-commits mailing list