@@ -, +, @@ --- C4/ILSDI/Services.pm | 6 ++++++ opac/ilsdi.pl | 2 +- 2 files changed, 7 insertions(+), 1 deletion(-) --- a/C4/ILSDI/Services.pm +++ a/C4/ILSDI/Services.pm @@ -34,6 +34,7 @@ use HTML::Entities; use CGI qw ( -utf8 ); use DateTime; use C4::Auth; +use C4::Members::Attributes qw(GetBorrowerAttributes); =head1 NAME @@ -428,6 +429,11 @@ sub GetPatronInfo { $borrower->{'loans'}->{'loan'} = $issues; } + if ( $cgi->param('show_attributes') eq "1" ) { + my $attrs = GetBorrowerAttributes( $borrowernumber, 0, 1 ); + $borrower->{'attributes'} = $attrs; + } + return $borrower; } --- a/opac/ilsdi.pl +++ a/opac/ilsdi.pl @@ -105,7 +105,7 @@ my %optional = ( 'GetAuthorityRecords' => ['schema'], 'LookupPatron' => ['id_type'], 'AuthenticatePatron' => [], - 'GetPatronInfo' => [ 'show_contact', 'show_fines', 'show_holds', 'show_loans' ], + 'GetPatronInfo' => [ 'show_contact', 'show_fines', 'show_holds', 'show_loans', 'show_attributes' ], 'GetPatronStatus' => [], 'GetServices' => [], 'RenewLoan' => ['desired_due_date'], --