Handle hostnames with upper-case letters
[webmin.git] / raid / cgi_args.pl
1
2 do 'raid-lib.pl';
3
4 sub cgi_args
5 {
6 my ($cgi) = @_;
7 if ($cgi eq 'view_raid.cgi') {
8         my $conf = &get_raidtab();
9         return @$conf ? 'index='.$conf->[0]->{'index'} : 'none';
10         }
11 elsif ($cgi eq 'raid_form.cgi') {
12         return 'level=0';
13         }
14 return undef;
15 }