From 02c1565bedf73cbd7abc5363196c386a14e8a92e Mon Sep 17 00:00:00 2001 From: Jamie Cameron Date: Sun, 7 Jun 2009 20:54:52 +0000 Subject: [PATCH] Add cgi args parser --- mount/cgi_args.pl | 21 +++++++++++++++++++++ 1 file changed, 21 insertions(+) create mode 100644 mount/cgi_args.pl diff --git a/mount/cgi_args.pl b/mount/cgi_args.pl new file mode 100644 index 000000000..c4bab7bcb --- /dev/null +++ b/mount/cgi_args.pl @@ -0,0 +1,21 @@ + +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; +}