X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=members%2Fmember-flags.pl;h=ca8c9d086083ad7ac4965ab29925257e376117f4;hb=d38120cc27e530aa4124728daf69b5fc597ddb2a;hp=007b56cdd78044906735afd3707d1b4ed16f4d8e;hpb=e82f88d5d97dbf478dd3598e3ccbfe60f602588d;p=koha.git diff --git a/members/member-flags.pl b/members/member-flags.pl index 007b56cdd7..ca8c9d0860 100755 --- a/members/member-flags.pl +++ b/members/member-flags.pl @@ -13,6 +13,7 @@ use C4::Auth qw(:DEFAULT :EditPermissions); use C4::Context; use C4::Members; use C4::Branch; +use C4::Members::Attributes qw(GetBorrowerAttributes); #use C4::Acquisitions; use C4::Output; @@ -161,7 +162,15 @@ if ($input->param('newflags')) { $template->param( adultborrower => 1 ) if ( $bor->{'category_type'} eq 'A' ); my ($picture, $dberror) = GetPatronImage($bor->{'cardnumber'}); $template->param( picture => 1 ) if $picture; - + +if (C4::Context->preference('ExtendedPatronAttributes')) { + my $attributes = GetBorrowerAttributes($bor->{'borrowernumber'}); + $template->param( + ExtendedPatronAttributes => 1, + extendedattributes => $attributes + ); +} + $template->param( borrowernumber => $bor->{'borrowernumber'}, cardnumber => $bor->{'cardnumber'}, @@ -182,6 +191,7 @@ $template->param( branchname => GetBranchName($bor->{'branchcode'}), loop => \@loop, is_child => ($bor->{'category_type'} eq 'C'), + activeBorrowerRelationship => (C4::Context->preference('borrowerRelationship') ne ''), ); output_html_with_http_headers $input, $cookie, $template->output;