From: Jeff Godin Date: Wed, 29 May 2013 18:31:31 +0000 (-0400) Subject: Change format of LibraryREST user object X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=37593f88a64c84a649014fee99830ce52932afde;p=evergreen%2Ftadl.git Change format of LibraryREST user object Change format of LibraryREST user object to match that of the Mock driver, which we have previously prototyped against. Signed-off-by: Jeff Godin --- diff --git a/Open-ILS/src/perlmods/lib/OpenILS/LibraryREST.pm b/Open-ILS/src/perlmods/lib/OpenILS/LibraryREST.pm index 94477a820a..70c19f398e 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/LibraryREST.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/LibraryREST.pm @@ -90,13 +90,16 @@ sub get_user { my $name = join(' ', @$name_parts); return { - user => { - name => $name, - name_parts => $name_parts, - }, - checkouts => $user_summary->{checkouts}, - holds => $user_summary->{holds}, - balance => $user_summary->{fines}->{balance_owed}, + id => $target_user, + name => $name, + name_parts => $name_parts, + summary => { + checkouts => $user_summary->{checkouts}->{total_out}, + checkouts_detail => $user_summary->{checkouts}, + holds => $user_summary->{holds}->{total}, + holds_detail => $user_summary->{holds}, + balance => $user_summary->{fines}->{balance_owed}, + } } }