Lines 117-123
sub HandleShelfNumber {
Link Here
|
117 |
my $shelfnumber = $query->param('shelfnumber'); |
117 |
my $shelfnumber = $query->param('shelfnumber'); |
118 |
my $shelf = Koha::Virtualshelves->find( $shelfnumber ); |
118 |
my $shelf = Koha::Virtualshelves->find( $shelfnumber ); |
119 |
if ( $shelf->can_biblios_be_added( $loggedinuser ) ) { |
119 |
if ( $shelf->can_biblios_be_added( $loggedinuser ) ) { |
120 |
$shelf-> |
|
|
121 |
AddBibliosToShelf($shelfnumber,@biblionumber); |
120 |
AddBibliosToShelf($shelfnumber,@biblionumber); |
122 |
#Close this page and return |
121 |
#Close this page and return |
123 |
print $query->header; |
122 |
print $query->header; |
124 |
- |
|
|