mirror of
https://github.com/webmin/webmin.git
synced 2026-02-10 01:02:19 +00:00
13 lines
219 B
Perl
13 lines
219 B
Perl
|
|
do 'servers-lib.pl';
|
|
|
|
sub cgi_args
|
|
{
|
|
my ($cgi) = @_;
|
|
if ($cgi eq 'edit_serv.cgi' && $access{'edit'}) {
|
|
my @servers = &list_servers();
|
|
return @servers ? 'id='.&urlize($servers[0]->{'id'}) : 'none';
|
|
}
|
|
return undef;
|
|
}
|