Files
webmin/spam/cgi_args.pl
2009-06-10 01:07:56 +00:00

13 lines
189 B
Perl

do 'spam-lib.pl';
sub cgi_args
{
my ($cgi) = @_;
if ($cgi =~ /^edit_/) {
# First allowed file, if any
return $access{'file'} ? 'file='.&urlize($access{'file'}) : '';
}
return undef;
}