2 # Show a form for editing a resource control or adding one
4 require './zones-lib.pl';
7 $zinfo = &get_zone($in{'zone'});
8 $zinfo || &error($text{'edit_egone'});
10 # Find the rctl object
11 ($rctl) = grep { $_->{'name'} eq $in{'old'} } @{$zinfo->{'rctl'}};
12 $rctl || &error($text{'rctl_egone'});
14 $p = new Webmin::Page(&zone_title($in{'zone'}),
15 $in{'new'} ? $text{'rctl_title1'} : $text{'rctl_title2'},
17 $p->add_form(&get_rctl_form(\%in, $zinfo, $rctl));
18 $p->add_footer("edit_zone.cgi?zone=$in{'zone'}", $text{'edit_return'});