do 'xinetd-lib.pl';

sub cgi_args
{
my ($cgi) = @_;
if ($cgi eq 'edit_serv.cgi') {
	my @conf = grep { $_->{'name'} eq 'service' } &get_xinetd_config();
	return @conf ? 'idx='.$conf[0]->{'index'} : 'new=1';
	}
return undef;
}