Attachment #136220 for bug #25498

View | Details | Raw Unified | Return to bug 25498
Collapse All | Expand All




    return $has_expired == 1 ? 1 : 0
}

=head3 sharee

    Returns related Koha::Patron object for the sharee (patron who got this share).

=cut

sub sharee {
    my $self = shift;
    return Koha::Patron->_new_from_dbic( $self->{_result}->borrowernumber );
}

Lines 272-278 if ( $op eq 'add_form' ) { Link Here

(-)a/opac/opac-shelves.pl (-2 / +1 lines)
272	my $patrons = [];	272	my $patrons = [];
273	my $shares = $shelf->get_shares->search({ borrowernumber => { '!=' => undef } });	273	my $shares = $shelf->get_shares->search({ borrowernumber => { '!=' => undef } });
274	while( my $share = $shares->next ) {	274	while( my $share = $shares->next ) {
275	push @$patrons, { email => $share->patron->notice_email_address, borrowernumber => $share->get_column('borrowernumber') };	275	push @$patrons, { email => $share->sharee->notice_email_address, borrowernumber => $share->get_column('borrowernumber') };
276	}	276	}
277	$template->param( shared_users => $patrons );	277	$template->param( shared_users => $patrons );
278	$op = 'transfer';	278	$op = 'transfer';
279	-

Return to bug 25498

Lines 81-93 sub has_expired { Link Here

(-)a/Koha/Virtualshelfshare.pm (-3 / +3 lines)
81	return $has_expired == 1 ? 1 : 0	81	return $has_expired == 1 ? 1 : 0
82	}	82	}
83		83
84	=head3 patron	84	=head3 sharee
85		85
86	Returns related Koha::Patron object for this share.	86	Returns related Koha::Patron object for the sharee (patron who got this share).
87		87
88	=cut	88	=cut
89		89
90	sub patron {	90	sub sharee {
91	my $self = shift;	91	my $self = shift;
92	return Koha::Patron->_new_from_dbic( $self->{_result}->borrowernumber );	92	return Koha::Patron->_new_from_dbic( $self->{_result}->borrowernumber );
93	}	93	}