%PDF- %PDF-
Mini Shell

Mini Shell

Direktori : /usr/share/webmin/mount/
Upload File :
Create Path :
Current File : //usr/share/webmin/mount/cgi_args.pl

do 'mount-lib.pl';

sub cgi_args
{
my ($cgi) = @_;
if ($cgi eq 'edit_mount.cgi') {
	# Find root filesystem, or first mount
	my @mounts = &list_mounts();
	return 'none' if (!@mounts);
	my $i = 0;
	foreach my $m (@mounts) {
		if ($m->[0] eq '/') {
			return 'index='.$i;
			}
		$i++;
		}
	return 'index=0';
	}
return undef;
}

Zerion Mini Shell 1.0