[freeside-commits] freeside/httemplate/edit radius_group.html, 1.3, 1.4

Mark Wells mark at wavetail.420.am
Thu Feb 16 15:51:01 PST 2012


Update of /home/cvs/cvsroot/freeside/httemplate/edit
In directory wavetail.420.am:/tmp/cvs-serv2061/httemplate/edit

Modified Files:
	radius_group.html 
Log Message:
delete RADIUS groups, #16491

Index: radius_group.html
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/edit/radius_group.html,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -w -d -r1.3 -r1.4
--- radius_group.html	25 Nov 2011 23:51:48 -0000	1.3
+++ radius_group.html	16 Feb 2012 23:50:58 -0000	1.4
@@ -8,7 +8,9 @@
     'attrnum'   => 'Attribute',
     'priority'  => 'Priority',
   },
-  'viewall_dir' => 'browse',
+  'menubar' => \@menubar,
+  'edit_callback' => $edit_callback,
+  'error_callback' => $edit_callback,
   'fields' => [
     { 'field'     => 'groupname',
       'type'      => 'text',
@@ -40,6 +42,16 @@
 die "access denied"
   unless $FS::CurrentUser::CurrentUser->access_right('Configuration');
 
+my @menubar = ('View all RADIUS Groups' => $p.'browse/radius_group.html');
+
+my $edit_callback = sub {
+  my ($cgi, $object) = @_;
+  if ( $object->groupnum ) {
+    my $link = $p.'misc/delete-radius_group.html?'.$object->groupnum;
+    push @menubar, 'Delete this Group', $link;
+  }
+};
+
 my $m2_error_callback = sub { # reconstruct the list
   my ($cgi, $object) = @_;
 



More information about the freeside-commits mailing list