Bug 11889: (QA follow-up) Add POD ground work

Make QA tools a fraction happier ;)

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
This commit is contained in:
Marcel de Rooy 2022-06-08 14:05:42 +00:00 committed by Tomas Cohen Arazi
parent 5e544116c8
commit 277c2d7fd8
Signed by: tomascohen
GPG key ID: 0A272EA1B2F3C15F

View file

@ -35,7 +35,7 @@ Koha::Virtualshelf - Koha Virtualshelf Object class
=cut
=head3 type
=head3 get_private_shelves
=cut
@ -62,6 +62,9 @@ sub get_private_shelves {
);
}
=head3 get_public_shelves
=cut
sub get_public_shelves {
my ( $self, $params ) = @_;
@ -80,6 +83,10 @@ sub get_public_shelves {
);
}
=head3 get_some_shelves
=cut
sub get_some_shelves {
my ( $self, $params ) = @_;
my $borrowernumber = $params->{borrowernumber} || 0;
@ -142,6 +149,10 @@ sub get_some_shelves {
);
}
=head3 get_shelves_containing_record
=cut
sub get_shelves_containing_record {
my ( $self, $params ) = @_;
my $borrowernumber = $params->{borrowernumber};
@ -180,6 +191,10 @@ sub get_shelves_containing_record {
);
}
=head3 get_shared_shelves
=cut
sub get_shared_shelves {
my ( $self, $params ) = @_;
my $borrowernumber = $params->{borrowernumber} || 0;
@ -193,10 +208,18 @@ sub get_shared_shelves {
);
}
=head3 _type
=cut
sub _type {
return 'Virtualshelve';
}
=head3 object_class
=cut
sub object_class {
return 'Koha::Virtualshelf';
}