Lines 118-127
if ( $op eq 'show' ) {
Link Here
|
118 |
} |
118 |
} |
119 |
} else { |
119 |
} else { |
120 |
for my $smsnumber (@smsnumbers ) { |
120 |
for my $smsnumber (@smsnumbers ) { |
121 |
my $patron = Koha::Patrons->find( { smsalertnumber => $smsnumber } ); |
121 |
my @patrons = Koha::Patrons->search( { smsalertnumber => $smsnumber } ); |
|
|
122 |
my $patron; |
123 |
my $borrowernumber; |
124 |
my $value; |
125 |
foreach $patron (@patrons) { |
126 |
$patron = $patron->unblessed; |
127 |
$value = $patron->{userid} || $patron->{borrowernumber}; |
128 |
} |
129 |
warn scalar @patrons; |
130 |
|
131 |
warn $patron; |
132 |
|
122 |
if ( $patron ) { |
133 |
if ( $patron ) { |
123 |
if ( $logged_in_user->can_see_patron_infos( $patron ) ) { |
134 |
if ( $logged_in_user->can_see_patron_infos( $patron ) ) { |
124 |
$patron = $patron->unblessed; |
135 |
$patron = $patron->unblessed; |
|
|
136 |
warn $patron->{borrowernumber}; |
125 |
$patron->{patron_attributes} = C4::Members::Attributes::GetBorrowerAttributes( $patron->{borrowernumber} ); |
137 |
$patron->{patron_attributes} = C4::Members::Attributes::GetBorrowerAttributes( $patron->{borrowernumber} ); |
126 |
$max_nb_attr = scalar( @{ $patron->{patron_attributes} } ) if scalar( @{ $patron->{patron_attributes} } ) > $max_nb_attr; |
138 |
$max_nb_attr = scalar( @{ $patron->{patron_attributes} } ) if scalar( @{ $patron->{patron_attributes} } ) > $max_nb_attr; |
127 |
push @borrowers, $patron; |
139 |
push @borrowers, $patron; |
128 |
- |
|
|