missing case for hg input type

This commit is contained in:
Rob Vermaas 2010-07-27 16:09:35 +00:00
parent 06e0e80591
commit 125cf1dc5b

View file

@ -198,7 +198,7 @@ sub checkInput {
my $inputType = trim $c->request->params->{"input-$baseName-type"}; my $inputType = trim $c->request->params->{"input-$baseName-type"};
error($c, "Invalid input type: $inputType") unless error($c, "Invalid input type: $inputType") unless
$inputType eq "svn" || $inputType eq "svn-checkout" || $inputType eq "cvs" || $inputType eq "tarball" || $inputType eq "svn" || $inputType eq "svn-checkout" || $inputType eq "hg" || $inputType eq "tarball" ||
$inputType eq "string" || $inputType eq "path" || $inputType eq "boolean" || $inputType eq "string" || $inputType eq "path" || $inputType eq "boolean" ||
$inputType eq "git" || $inputType eq "build" || $inputType eq "sysbuild" ; $inputType eq "git" || $inputType eq "build" || $inputType eq "sysbuild" ;