Remove dead code

This commit is contained in:
Eelco Dolstra
2013-09-30 11:57:38 +02:00
parent baafe77489
commit af2b0c8bad
2 changed files with 0 additions and 22 deletions

View File

@ -250,17 +250,6 @@ sub checkJobsetWrapped {
# Store the error messages for jobs that failed to evaluate.
foreach my $error (@{$jobs->{error}}) {
my $bindings = "";
foreach my $arg (@{$error->{arg}}) {
my $input = $inputInfo->{$arg->{name}}->[$arg->{altnr}] or die "invalid input";
$bindings .= ", " if $bindings ne "";
$bindings .= $arg->{name} . " = ";
given ($input->{type}) {
when ("string") { $bindings .= "\"" . $input->{value} . "\""; }
when ("boolean") { $bindings .= $input->{value}; }
default { $bindings .= "..."; }
}
}
$msg .=
($error->{location} ne "" ? "in job $error->{location}" : "at top-level") .
":\n" . $error->{msg} . "\n\n";