Remove uncontrolled debugging statements.
Yes, I should add a debug mode. But I'm not going to.
This commit is contained in:
parent
89149fe043
commit
6de0eb64a2
1 changed files with 0 additions and 4 deletions
|
@ -558,11 +558,8 @@ sub getRequest($$;$) {
|
||||||
notes => $req->{$requestType}{'notes'},
|
notes => $req->{$requestType}{'notes'},
|
||||||
};
|
};
|
||||||
my $configs = $self->getRequestConfigurations($requestType);
|
my $configs = $self->getRequestConfigurations($requestType);
|
||||||
use Data::Dumper;
|
|
||||||
print "CONFIGS:", Data::Dumper->Dump([$requestType, $configs]);
|
|
||||||
my $configName;
|
my $configName;
|
||||||
foreach my $key (keys %{$configs->{$requestTypeId}}) {
|
foreach my $key (keys %{$configs->{$requestTypeId}}) {
|
||||||
print "TEST: SEEING IF $key is our type... $configs->{$requestTypeId}{$key} == $req->{$requestType}{'type'} ... \n";
|
|
||||||
if ($configs->{$requestTypeId}{$key} == $req->{$requestType}{'request_configuration_id'}) { $configName = $key; last; }
|
if ($configs->{$requestTypeId}{$key} == $req->{$requestType}{'request_configuration_id'}) { $configName = $key; last; }
|
||||||
}
|
}
|
||||||
die("getRequest: discovered database integrity error: request_configuration, \"$req->{$requestType}{request_configuration_id} is " .
|
die("getRequest: discovered database integrity error: request_configuration, \"$req->{$requestType}{request_configuration_id} is " .
|
||||||
|
@ -576,7 +573,6 @@ sub getRequest($$;$) {
|
||||||
return undef if $ignoreFulfilledRequests;
|
return undef if $ignoreFulfilledRequests;
|
||||||
$rsp->{fulfillDate} = $fulfillReq->{$requestId}{date};
|
$rsp->{fulfillDate} = $fulfillReq->{$requestId}{date};
|
||||||
}
|
}
|
||||||
print "RSP RETURING: ", Data::Dumper->Dump([$rsp]);
|
|
||||||
return $rsp;
|
return $rsp;
|
||||||
}
|
}
|
||||||
######################################################################
|
######################################################################
|
||||||
|
|
Loading…
Reference in a new issue