Bug 15774: Add POD and license notices

Signed-off-by: Séverine QUEUNE <severine.queune@bulac.fr>
Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
Signed-off-by: Josef Moravec <josef.moravec@gmail.com>
Signed-off-by: Nick Clemens <nick@bywatersolutions.com>

diff --git a/Koha/AdditionalField.pm b/Koha/AdditionalField.pm
index 78de775..721c01f 100644 (file)
--- a/Koha/AdditionalField.pm
+++ b/Koha/AdditionalField.pm
@@ -1,5 +1,11 @@
 package Koha::AdditionalField;
 
+=head1 NAME
+
+Koha::AdditionalField - Koha::Object derived class for additional fields
+
+=cut
+
 use Modern::Perl;
 
 use base qw(Koha::Object);
@@ -8,23 +14,13 @@ use C4::Context;
 
 sub _type { 'AdditionalField' }
 
-1;
-
-__END__
-
-=head1 NAME
-
-Koha::AdditionalField
-
 =head1 AUTHOR
 
-Jonathan Druart <jonathan.druart at biblibre.com>
+Koha Development Team <http://koha-community.org/>
 
-=head1 COPYRIGHT
+=head1 COPYRIGHT AND LICENSE
 
-Copyright 2013 BibLibre
-
-=head1 LICENSE
+Copyright 2013, 2018 BibLibre
 
 This file is part of Koha.
 
@@ -39,3 +35,11 @@ A PARTICULAR PURPOSE. See the GNU General Public License for more details.
 
 You should have received a copy of the GNU General Public License along
 with Koha; if not, see <http://www.gnu.org/licenses>.
+
+=head1 SEE ALSO
+
+L<Koha::Object>
+
+=cut
+
+1;

diff --git a/Koha/AdditionalFieldValue.pm b/Koha/AdditionalFieldValue.pm
index f54c811..48c399f 100644 (file)
--- a/Koha/AdditionalFieldValue.pm
+++ b/Koha/AdditionalFieldValue.pm
@@ -1,9 +1,44 @@
 package Koha::AdditionalFieldValue;
 
+=head1 NAME
+
+Koha::AdditionalFieldValue - Koha::Object derived class for additional field
+values
+
+=cut
+
 use Modern::Perl;
 
 use base 'Koha::Object';
 
 sub _type { 'AdditionalFieldValue' }
 
+=head1 AUTHOR
+
+Koha Development Team <http://koha-community.org/>
+
+=head1 COPYRIGHT AND LICENSE
+
+Copyright 2018 BibLibre
+
+This file is part of Koha.
+
+Koha is free software; you can redistribute it and/or modify it under the
+terms of the GNU General Public License as published by the Free Software
+Foundation; either version 3 of the License, or (at your option) any later
+version.
+
+Koha is distributed in the hope that it will be useful, but WITHOUT ANY
+WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
+A PARTICULAR PURPOSE. See the GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License along
+with Koha; if not, see <http://www.gnu.org/licenses>.
+
+=head1 SEE ALSO
+
+L<Koha::Object>
+
+=cut
+
 1;

diff --git a/Koha/AdditionalFieldValues.pm b/Koha/AdditionalFieldValues.pm
index fa3576f..2b89014 100644 (file)
--- a/Koha/AdditionalFieldValues.pm
+++ b/Koha/AdditionalFieldValues.pm
@@ -1,5 +1,12 @@
 package Koha::AdditionalFieldValues;
 
+=head1 NAME
+
+Koha::AdditionalFieldValues - Koha::Objects derived class for additional field
+values
+
+=cut
+
 use Modern::Perl;
 
 use base 'Koha::Objects';
@@ -7,4 +14,32 @@ use base 'Koha::Objects';
 sub _type { 'AdditionalFieldValue' }
 sub object_class { 'Koha::AdditionalFieldValue' }
 
+=head1 AUTHOR
+
+Koha Development Team <http://koha-community.org/>
+
+=head1 COPYRIGHT AND LICENSE
+
+Copyright 2018 BibLibre
+
+This file is part of Koha.
+
+Koha is free software; you can redistribute it and/or modify it under the
+terms of the GNU General Public License as published by the Free Software
+Foundation; either version 3 of the License, or (at your option) any later
+version.
+
+Koha is distributed in the hope that it will be useful, but WITHOUT ANY
+WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
+A PARTICULAR PURPOSE. See the GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License along
+with Koha; if not, see <http://www.gnu.org/licenses>.
+
+=head1 SEE ALSO
+
+L<Koha::Objects>
+
+=cut
+
 1;

diff --git a/Koha/AdditionalFields.pm b/Koha/AdditionalFields.pm
index 2d4761b..4900dda 100644 (file)
--- a/Koha/AdditionalFields.pm
+++ b/Koha/AdditionalFields.pm
@@ -1,5 +1,11 @@
 package Koha::AdditionalFields;
 
+=head1 NAME
+
+Koha::AdditionalFields - Koha::Objects derived class for additional fields
+
+=cut
+
 use Modern::Perl;
 
 use base 'Koha::Objects';
@@ -9,4 +15,32 @@ use Koha::AdditionalField;
 sub _type { 'AdditionalField' }
 sub object_class { 'Koha::AdditionalField' }
 
+=head1 AUTHOR
+
+Koha Development Team <http://koha-community.org/>
+
+=head1 COPYRIGHT AND LICENSE
+
+Copyright 2018 BibLibre
+
+This file is part of Koha.
+
+Koha is free software; you can redistribute it and/or modify it under the
+terms of the GNU General Public License as published by the Free Software
+Foundation; either version 3 of the License, or (at your option) any later
+version.
+
+Koha is distributed in the hope that it will be useful, but WITHOUT ANY
+WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
+A PARTICULAR PURPOSE. See the GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License along
+with Koha; if not, see <http://www.gnu.org/licenses>.
+
+=head1 SEE ALSO
+
+L<Koha::Objects>
+
+=cut
+
 1;

diff --git a/Koha/Object/Mixin/AdditionalFields.pm b/Koha/Object/Mixin/AdditionalFields.pm
index 090e282..e297058 100644 (file)
--- a/Koha/Object/Mixin/AdditionalFields.pm
+++ b/Koha/Object/Mixin/AdditionalFields.pm
@@ -59,10 +59,42 @@ sub set_additional_fields {
     }
 }
 
+=head3 additional_field_values
+
+Returns additional field values
+
+    my @values = $foo->additional_field_values;
+
+=cut
+
 sub additional_field_values {
     my ($self) = @_;
 
     return $self->_result->additional_field_values;
 }
 
+=head1 AUTHOR
+
+Koha Development Team <http://koha-community.org/>
+
+=head1 COPYRIGHT AND LICENSE
+
+Copyright 2018 BibLibre
+
+This file is part of Koha.
+
+Koha is free software; you can redistribute it and/or modify it under the
+terms of the GNU General Public License as published by the Free Software
+Foundation; either version 3 of the License, or (at your option) any later
+version.
+
+Koha is distributed in the hope that it will be useful, but WITHOUT ANY
+WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
+A PARTICULAR PURPOSE. See the GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License along
+with Koha; if not, see <http://www.gnu.org/licenses>.
+
+=cut
+
 1;

diff --git a/Koha/Objects/Mixin/AdditionalFields.pm b/Koha/Objects/Mixin/AdditionalFields.pm
index 62c784f..cf3db56 100644 (file)
--- a/Koha/Objects/Mixin/AdditionalFields.pm
+++ b/Koha/Objects/Mixin/AdditionalFields.pm
@@ -56,4 +56,28 @@ sub search_additional_fields {
     return $class->search(\%conditions, { join => [ ('additional_field_values') x $idx ] });
 }
 
+=head1 AUTHOR
+
+Koha Development Team <http://koha-community.org/>
+
+=head1 COPYRIGHT AND LICENSE
+
+Copyright 2018 BibLibre
+
+This file is part of Koha.
+
+Koha is free software; you can redistribute it and/or modify it under the
+terms of the GNU General Public License as published by the Free Software
+Foundation; either version 3 of the License, or (at your option) any later
+version.
+
+Koha is distributed in the hope that it will be useful, but WITHOUT ANY
+WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
+A PARTICULAR PURPOSE. See the GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License along
+with Koha; if not, see <http://www.gnu.org/licenses>.
+
+=cut
+
 1;