Fix failure in t_integration/server.t by adding a replaceNamedLookupValues before check_server_input call
Project: http://git-wip-us.apache.org/repos/asf/incubator-trafficcontrol/repo Commit: http://git-wip-us.apache.org/repos/asf/incubator-trafficcontrol/commit/8c5ac3b5 Tree: http://git-wip-us.apache.org/repos/asf/incubator-trafficcontrol/tree/8c5ac3b5 Diff: http://git-wip-us.apache.org/repos/asf/incubator-trafficcontrol/diff/8c5ac3b5 Branch: refs/heads/master Commit: 8c5ac3b52626b5824ecae3965df1d3bc3bd5194b Parents: d34fb33 Author: nir-sopher <nirsop...@gmail.com> Authored: Thu Mar 16 14:55:12 2017 +0200 Committer: Jeremy Mitchell <mitchell...@gmail.com> Committed: Thu Apr 6 15:09:16 2017 -0600 ---------------------------------------------------------------------- traffic_ops/app/lib/UI/UploadHandlerCsv.pm | 2 ++ 1 file changed, 2 insertions(+) ---------------------------------------------------------------------- http://git-wip-us.apache.org/repos/asf/incubator-trafficcontrol/blob/8c5ac3b5/traffic_ops/app/lib/UI/UploadHandlerCsv.pm ---------------------------------------------------------------------- diff --git a/traffic_ops/app/lib/UI/UploadHandlerCsv.pm b/traffic_ops/app/lib/UI/UploadHandlerCsv.pm index d3c7568..b34d1fe 100644 --- a/traffic_ops/app/lib/UI/UploadHandlerCsv.pm +++ b/traffic_ops/app/lib/UI/UploadHandlerCsv.pm @@ -326,6 +326,7 @@ sub processCSV { } else { my $paramHashRef = &getParamHashRef( \@p, $lineNumber ); + $paramHashRef = &replaceNamedLookupValues( $paramHashRef, $cdnHashRef, $cachegroupHashRef, $typeHashRef, $profileHashRef, $physLocationHashRef ); # print Dumper($paramHashRef); $processCSVErrors .= &UI::Server::check_server_input( $self, $paramHashRef ); @@ -366,6 +367,7 @@ sub processCSV { } else { my $paramHashRef = &getParamHashRef( \@p, $lineNumber ); + $paramHashRef = &replaceNamedLookupValues( $paramHashRef, $cdnHashRef, $cachegroupHashRef, $typeHashRef, $profileHashRef, $physLocationHashRef ); $processCSVErrors .= &UI::Server::check_server_input( $self, $paramHashRef ); my $enteredCdn = $p[9]; my $enteredCachegroup = $p[10];
