|
Lines 126-136
deleted biblio.
Link Here
|
| 126 |
sub biblio { |
126 |
sub biblio { |
| 127 |
my ( $self, $params ) = @_; |
127 |
my ( $self, $params ) = @_; |
| 128 |
|
128 |
|
| 129 |
my $biblio = Koha::Biblios->search( { biblionumber => $self->biblionumber() } )->next(); |
129 |
$self->{_biblio} ||= Koha::Biblio->_new_from_dbic( $self->_result()->biblio ); |
|
|
130 |
$self->{_biblio} ||= Koha::Deleted::Biblios->find( { biblionumber => $self->biblionumber() } ) if ( $params->{deleted} ); |
| 130 |
|
131 |
|
| 131 |
$biblio ||= Koha::Deleted::Biblios->search( { biblionumber => $self->biblionumber() } )->next() if ( $params->{deleted} ); |
132 |
return $self->{_biblio}; |
| 132 |
|
|
|
| 133 |
return $biblio || undef; |
| 134 |
} |
133 |
} |
| 135 |
|
134 |
|
| 136 |
=head3 biblioitem |
135 |
=head3 biblioitem |
|
Lines 148-158
deleted biblioitem.
Link Here
|
| 148 |
sub biblioitem { |
147 |
sub biblioitem { |
| 149 |
my ( $self, $params ) = @_; |
148 |
my ( $self, $params ) = @_; |
| 150 |
|
149 |
|
| 151 |
my $biblioitem = Koha::BiblioItems->search( { biblionumber => $self->biblionumber() } )->next(); |
150 |
$self->{_biblioitem} ||= Koha::BiblioItem->_new_from_dbic( $self->_result()->biblioitem ); |
| 152 |
|
151 |
$self->{_biblioitem} ||= Koha::Deleted::BiblioItems->find( { biblionumber => $self->biblionumber() } ) if ( $params->{deleted} ); |
| 153 |
$biblioitem ||= Koha::Deleted::BiblioItems->search( { biblionumber => $self->biblionumber() } )->next() if ( $params->{deleted} ); |
|
|
| 154 |
|
152 |
|
| 155 |
return $biblioitem || undef; |
153 |
return $self->{_biblioitem}; |
| 156 |
} |
154 |
} |
| 157 |
|
155 |
|
| 158 |
=head3 type |
156 |
=head3 type |