From: Jason Stephenson Date: Sat, 23 Aug 2014 15:29:55 +0000 (-0400) Subject: More LookupVersion fixes. X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=6a4f7b4e637c1a2f1f6f480df14c2bc4bfdc4c31;p=working%2FNCIPServer.git More LookupVersion fixes. NCIP has too many redundant layers of tags. Signed-off-by: Jason Stephenson --- diff --git a/lib/NCIP/ILS.pm b/lib/NCIP/ILS.pm index dbc6a32..2bceb16 100644 --- a/lib/NCIP/ILS.pm +++ b/lib/NCIP/ILS.pm @@ -187,8 +187,8 @@ sub lookupversion { my $response = NCIP::Response->new({type => "LookupVersionResponse"}); my $payload = { - fromagencyid => $request->{LookupVersion}->{ToAgencyId}, - toagencyid => $request->{LookupVersion}->{FromAgencyId}, + fromagencyid => $request->{LookupVersion}->{ToAgencyId}->{AgencyId}, + toagencyid => $request->{LookupVersion}->{FromAgencyId}->{AgencyId}, versions => [ NCIP::Const::SUPPORTED_VERSIONS ] }; $response->data($payload); diff --git a/templates/includes/LookupVersionResponse.inc b/templates/includes/LookupVersionResponse.inc index 8b111e0..e596073 100644 --- a/templates/includes/LookupVersionResponse.inc +++ b/templates/includes/LookupVersionResponse.inc @@ -1,8 +1,12 @@ + [%- data.fromagencyid -%] + + [%- data.toagencyid -%] + [% FOREACH version IN data.versions -%]