Lines 33-39
use HTML::Entities;
Link Here
|
33 |
use CGI qw ( -utf8 ); |
33 |
use CGI qw ( -utf8 ); |
34 |
use DateTime; |
34 |
use DateTime; |
35 |
use C4::Auth; |
35 |
use C4::Auth; |
36 |
use C4::Members::Attributes qw(GetBorrowerAttributes); |
|
|
37 |
use Koha::DateUtils; |
36 |
use Koha::DateUtils; |
38 |
|
37 |
|
39 |
use Koha::Biblios; |
38 |
use Koha::Biblios; |
Lines 505-511
sub GetPatronInfo {
Link Here
|
505 |
|
504 |
|
506 |
my $show_attributes = $cgi->param('show_attributes'); |
505 |
my $show_attributes = $cgi->param('show_attributes'); |
507 |
if ( $show_attributes && $show_attributes eq "1" ) { |
506 |
if ( $show_attributes && $show_attributes eq "1" ) { |
508 |
my $attrs = GetBorrowerAttributes( $borrowernumber, 1 ); |
507 |
# FIXME Regression expected here, we do not retrieve the same field as previously |
|
|
508 |
# Waiting for answer on bug 14257 comment 15 |
509 |
my $attrs = $patron->get_extended_attributes->search({ opac_display => 1 })->unblessed; |
509 |
$borrower->{'attributes'} = $attrs; |
510 |
$borrower->{'attributes'} = $attrs; |
510 |
} |
511 |
} |
511 |
|
512 |
|
512 |
- |
|
|