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

(-)a/C4/Accounts.pm (-1 / +1 lines)
Lines 15-21 package C4::Accounts; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use C4::Context;
21
use C4::Context;
(-)a/C4/Acquisition.pm (-2 / +2 lines)
Lines 15-21 package C4::Acquisition; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use Carp qw( carp croak );
21
use Carp qw( carp croak );
Lines 3013-3018 __END__ Link Here
3013
3013
3014
=head1 AUTHOR
3014
=head1 AUTHOR
3015
3015
3016
Koha Development Team <http://koha-community.org/>
3016
Koha Development Team <https://koha-community.org/>
3017
3017
3018
=cut
3018
=cut
(-)a/C4/Auth.pm (-1 / +1 lines)
Lines 15-21 package C4::Auth; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/C4/Auth_with_cas.pm (-1 / +1 lines)
Lines 15-21 package C4::Auth_with_cas; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/C4/Auth_with_ldap.pm (-1 / +1 lines)
Lines 15-21 package C4::Auth_with_ldap; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use Carp qw( croak );
21
use Carp qw( croak );
(-)a/C4/Auth_with_shibboleth.pm (-2 / +2 lines)
Lines 15-21 package C4::Auth_with_shibboleth; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
Lines 368-374 Note: The minimum you need here is a <matchpoint> block, containing a valid colu Link Here
368
368
369
It should be as simple as that; you should now be able to login via shibboleth in the opac.
369
It should be as simple as that; you should now be able to login via shibboleth in the opac.
370
370
371
If you need more help configuring your B<S>ervice B<P>rovider to authenticate against a chosen B<Id>entity B<P>rovider then it might be worth taking a look at the community wiki L<page|http://wiki.koha-community.org/wiki/Shibboleth_Configuration>
371
If you need more help configuring your B<S>ervice B<P>rovider to authenticate against a chosen B<Id>entity B<P>rovider then it might be worth taking a look at the community wiki L<page|https://wiki.koha-community.org/wiki/Shibboleth_Configuration>
372
372
373
=head1 FUNCTIONS
373
=head1 FUNCTIONS
374
374
(-)a/C4/AuthoritiesMarc.pm (-2 / +2 lines)
Lines 16-22 package C4::AuthoritiesMarc; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use strict;
21
use strict;
22
use warnings;
22
use warnings;
Lines 1903-1909 __END__ Link Here
1903
1903
1904
=head1 AUTHOR
1904
=head1 AUTHOR
1905
1905
1906
Koha Development Team <http://koha-community.org/>
1906
Koha Development Team <https://koha-community.org/>
1907
1907
1908
Paul POULAIN paul.poulain@free.fr
1908
Paul POULAIN paul.poulain@free.fr
1909
Ere Maijala ere.maijala@helsinki.fi
1909
Ere Maijala ere.maijala@helsinki.fi
(-)a/C4/AuthoritiesMarc/MARC21.pm (-2 / +2 lines)
Lines 15-21 package C4::AuthoritiesMarc::MARC21; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
Lines 104-110 sub fix_marc21_auth_type_location { Link Here
104
104
105
=head1 AUTHOR
105
=head1 AUTHOR
106
106
107
Koha Development Team <http://koha-community.org/>
107
Koha Development Team <https://koha-community.org/>
108
108
109
Galen Charlton <galen.charlton@liblime.com>
109
Galen Charlton <galen.charlton@liblime.com>
110
110
(-)a/C4/AuthoritiesMarc/UNIMARC.pm (-2 / +2 lines)
Lines 15-21 package C4::AuthoritiesMarc::UNIMARC; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
Lines 69-75 sub default_auth_type_location { Link Here
69
69
70
=head1 AUTHOR
70
=head1 AUTHOR
71
71
72
Koha Development Team <http://koha-community.org/>
72
Koha Development Team <https://koha-community.org/>
73
73
74
Galen Charlton <galen.charlton@liblime.com>
74
Galen Charlton <galen.charlton@liblime.com>
75
75
(-)a/C4/Barcodes.pm (-1 / +1 lines)
Lines 15-21 package C4::Barcodes; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/C4/Barcodes/EAN13.pm (-1 / +1 lines)
Lines 15-21 package C4::Barcodes::EAN13; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/C4/Barcodes/ValueBuilder.pm (-1 / +1 lines)
Lines 16-22 package C4::Barcodes::ValueBuilder; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
package C4::Barcodes::ValueBuilder::incremental;
21
package C4::Barcodes::ValueBuilder::incremental;
22
use Modern::Perl;
22
use Modern::Perl;
(-)a/C4/Barcodes/annual.pm (-1 / +1 lines)
Lines 15-21 package C4::Barcodes::annual; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/C4/Barcodes/hbyymmincr.pm (-1 / +1 lines)
Lines 15-21 package C4::Barcodes::hbyymmincr; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/C4/Barcodes/incremental.pm (-1 / +1 lines)
Lines 15-21 package C4::Barcodes::incremental; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/C4/Biblio.pm (-2 / +2 lines)
Lines 17-23 package C4::Biblio; Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
23
Lines 3208-3214 __END__ Link Here
3208
3208
3209
=head1 AUTHOR
3209
=head1 AUTHOR
3210
3210
3211
Koha Development Team <http://koha-community.org/>
3211
Koha Development Team <https://koha-community.org/>
3212
3212
3213
Paul POULAIN paul.poulain@free.fr
3213
Paul POULAIN paul.poulain@free.fr
3214
3214
(-)a/C4/Breeding.pm (-1 / +1 lines)
Lines 16-22 package C4::Breeding; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use strict;
21
use strict;
22
use warnings;
22
use warnings;
(-)a/C4/Budgets.pm (-2 / +2 lines)
Lines 15-21 package C4::Budgets; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use JSON;
21
use JSON;
Lines 1668-1673 __END__ Link Here
1668
1668
1669
=head1 AUTHOR
1669
=head1 AUTHOR
1670
1670
1671
Koha Development Team <http://koha-community.org/>
1671
Koha Development Team <https://koha-community.org/>
1672
1672
1673
=cut
1673
=cut
(-)a/C4/Calendar.pm (-1 / +1 lines)
Lines 13-19 package C4::Calendar; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use strict;
18
use strict;
19
use warnings;
19
use warnings;
(-)a/C4/Charset.pm (-2 / +2 lines)
Lines 15-21 package C4::Charset; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
Lines 1284-1290 sub char_decode5426 { Link Here
1284
1284
1285
=head1 AUTHOR
1285
=head1 AUTHOR
1286
1286
1287
Koha Development Team <http://koha-community.org/>
1287
Koha Development Team <https://koha-community.org/>
1288
1288
1289
Galen Charlton <galen.charlton@liblime.com>
1289
Galen Charlton <galen.charlton@liblime.com>
1290
1290
(-)a/C4/Circulation.pm (-2 / +2 lines)
Lines 16-22 package C4::Circulation; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
use DateTime;
22
use DateTime;
Lines 5077-5082 __END__ Link Here
5077
5077
5078
=head1 AUTHOR
5078
=head1 AUTHOR
5079
5079
5080
Koha Development Team <http://koha-community.org/>
5080
Koha Development Team <https://koha-community.org/>
5081
5081
5082
=cut
5082
=cut
(-)a/C4/ClassSortRoutine.pm (-2 / +2 lines)
Lines 15-21 package C4::ClassSortRoutine; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
Lines 123-129 sub _get_class_sort_key { Link Here
123
123
124
=head1 AUTHOR
124
=head1 AUTHOR
125
125
126
Koha Development Team <http://koha-community.org/>
126
Koha Development Team <https://koha-community.org/>
127
127
128
=cut
128
=cut
129
129
(-)a/C4/ClassSortRoutine/Dewey.pm (-2 / +2 lines)
Lines 15-21 package C4::ClassSortRoutine::Dewey; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
Lines 97-103 sub get_class_sort_key { Link Here
97
97
98
=head1 AUTHOR
98
=head1 AUTHOR
99
99
100
Koha Development Team <http://koha-community.org/>
100
Koha Development Team <https://koha-community.org/>
101
101
102
=cut
102
=cut
103
103
(-)a/C4/ClassSortRoutine/Generic.pm (-2 / +2 lines)
Lines 15-21 package C4::ClassSortRoutine::Generic; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
Lines 63-69 sub get_class_sort_key { Link Here
63
63
64
=head1 AUTHOR
64
=head1 AUTHOR
65
65
66
Koha Development Team <http://koha-community.org/>
66
Koha Development Team <https://koha-community.org/>
67
67
68
=cut
68
=cut
69
69
(-)a/C4/ClassSortRoutine/LCC.pm (-2 / +2 lines)
Lines 16-22 package C4::ClassSortRoutine::LCC; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use strict;
21
use strict;
22
use warnings;
22
use warnings;
Lines 59-65 sub get_class_sort_key { Link Here
59
59
60
=head1 AUTHOR
60
=head1 AUTHOR
61
61
62
Koha Development Team <http://koha-community.org/>
62
Koha Development Team <https://koha-community.org/>
63
63
64
=cut
64
=cut
65
65
(-)a/C4/ClassSource.pm (-2 / +2 lines)
Lines 14-20 package C4::ClassSource; Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
20
Lines 175-180 sub GetClassSort { Link Here
175
175
176
=head1 AUTHOR
176
=head1 AUTHOR
177
177
178
Koha Development Team <http://koha-community.org/>
178
Koha Development Team <https://koha-community.org/>
179
179
180
=cut
180
=cut
(-)a/C4/ClassSplitRoutine.pm (-2 / +2 lines)
Lines 15-21 package C4::ClassSplitRoutine; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
Lines 59-64 sub GetSplitRoutineNames { Link Here
59
59
60
=head1 AUTHOR
60
=head1 AUTHOR
61
61
62
Koha Development Team <http://koha-community.org/>
62
Koha Development Team <https://koha-community.org/>
63
63
64
=cut
64
=cut
(-)a/C4/ClassSplitRoutine/Dewey.pm (-2 / +2 lines)
Lines 15-21 package C4::ClassSplitRoutine::Dewey; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
Lines 69-74 sub split_callnumber { Link Here
69
69
70
=head1 AUTHOR
70
=head1 AUTHOR
71
71
72
Koha Development Team <http://koha-community.org/>
72
Koha Development Team <https://koha-community.org/>
73
73
74
=cut
74
=cut
(-)a/C4/ClassSplitRoutine/Generic.pm (-2 / +2 lines)
Lines 15-21 package C4::ClassSplitRoutine::Generic; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
Lines 63-68 sub split_callnumber { Link Here
63
63
64
=head1 AUTHOR
64
=head1 AUTHOR
65
65
66
Koha Development Team <http://koha-community.org/>
66
Koha Development Team <https://koha-community.org/>
67
67
68
=cut
68
=cut
(-)a/C4/ClassSplitRoutine/LCC.pm (-2 / +2 lines)
Lines 15-21 package C4::ClassSplitRoutine::LCC; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use Library::CallNumber::LC;
21
use Library::CallNumber::LC;
Lines 59-64 sub split_callnumber { Link Here
59
59
60
=head1 AUTHOR
60
=head1 AUTHOR
61
61
62
Koha Development Team <http://koha-community.org/>
62
Koha Development Team <https://koha-community.org/>
63
63
64
=cut
64
=cut
(-)a/C4/ClassSplitRoutine/RegEx.pm (-2 / +2 lines)
Lines 15-21 package C4::ClassSplitRoutine::RegEx; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
Lines 52-57 sub split_callnumber { Link Here
52
52
53
=head1 AUTHOR
53
=head1 AUTHOR
54
54
55
Koha Development Team <http://koha-community.org/>
55
Koha Development Team <https://koha-community.org/>
56
56
57
=cut
57
=cut
(-)a/C4/Context.pm (-1 / +1 lines)
Lines 15-21 package C4::Context; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/C4/Contract.pm (-2 / +2 lines)
Lines 15-21 package C4::Contract; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use C4::Context;
21
use C4::Context;
Lines 161-166 __END__ Link Here
161
161
162
=head1 AUTHOR
162
=head1 AUTHOR
163
163
164
Koha Development Team <http://koha-community.org/>
164
Koha Development Team <https://koha-community.org/>
165
165
166
=cut
166
=cut
(-)a/C4/CourseReserves.pm (-1 / +1 lines)
Lines 13-19 package C4::CourseReserves; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/C4/Creators.pm (-1 / +1 lines)
Lines 15-21 package C4::Creators; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/C4/Creators/Batch.pm (-1 / +1 lines)
Lines 325-331 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the Link Here
325
GNU General Public License for more details.
325
GNU General Public License for more details.
326
326
327
You should have received a copy of the GNU General Public License
327
You should have received a copy of the GNU General Public License
328
along with Koha; if not, see <http://www.gnu.org/licenses>.
328
along with Koha; if not, see <https://www.gnu.org/licenses>.
329
329
330
=head1 DISCLAIMER OF WARRANTY
330
=head1 DISCLAIMER OF WARRANTY
331
331
(-)a/C4/Creators/Layout.pm (-1 / +1 lines)
Lines 437-443 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the Link Here
437
GNU General Public License for more details.
437
GNU General Public License for more details.
438
438
439
You should have received a copy of the GNU General Public License
439
You should have received a copy of the GNU General Public License
440
along with Koha; if not, see <http://www.gnu.org/licenses>.
440
along with Koha; if not, see <https://www.gnu.org/licenses>.
441
441
442
=head1 DISCLAIMER OF WARRANTY
442
=head1 DISCLAIMER OF WARRANTY
443
443
(-)a/C4/Creators/Lib.pm (-1 / +1 lines)
Lines 15-21 package C4::Creators::Lib; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use Storable qw( dclone );
21
use Storable qw( dclone );
(-)a/C4/Creators/PDF.pm (-1 / +1 lines)
Lines 15-21 package C4::Creators::PDF; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/C4/Creators/Profile.pm (-1 / +1 lines)
Lines 316-322 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the Link Here
316
GNU General Public License for more details.
316
GNU General Public License for more details.
317
317
318
You should have received a copy of the GNU General Public License
318
You should have received a copy of the GNU General Public License
319
along with Koha; if not, see <http://www.gnu.org/licenses>.
319
along with Koha; if not, see <https://www.gnu.org/licenses>.
320
320
321
=head1 DISCLAIMER OF WARRANTY
321
=head1 DISCLAIMER OF WARRANTY
322
322
(-)a/C4/Creators/Template.pm (-1 / +1 lines)
Lines 438-444 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the Link Here
438
GNU General Public License for more details.
438
GNU General Public License for more details.
439
439
440
You should have received a copy of the GNU General Public License
440
You should have received a copy of the GNU General Public License
441
along with Koha; if not, see <http://www.gnu.org/licenses>.
441
along with Koha; if not, see <https://www.gnu.org/licenses>.
442
442
443
=head1 DISCLAIMER OF WARRANTY
443
=head1 DISCLAIMER OF WARRANTY
444
444
(-)a/C4/External/Amazon.pm (-1 / +1 lines)
Lines 16-22 package C4::External::Amazon; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use strict;
21
use strict;
22
use warnings;
22
use warnings;
(-)a/C4/External/BakerTaylor.pm (-1 / +1 lines)
Lines 16-22 package C4::External::BakerTaylor; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use XML::Simple;
21
use XML::Simple;
22
use LWP::Simple qw( get );
22
use LWP::Simple qw( get );
(-)a/C4/External/OverDrive.pm (-1 / +1 lines)
Lines 15-21 package C4::External::OverDrive; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/C4/External/Syndetics.pm (-1 / +1 lines)
Lines 16-22 package C4::External::Syndetics; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use XML::Simple qw( XMLout );
21
use XML::Simple qw( XMLout );
22
use XML::LibXML;
22
use XML::LibXML;
(-)a/C4/Form/MessagingPreferences.pm (-2 / +2 lines)
Lines 15-21 package C4::Form::MessagingPreferences; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
Lines 211-217 L<C4::Members::Messaging>, F<admin/categories.pl>, F<opac/opac-messaging.pl>, F< Link Here
211
211
212
=head1 AUTHOR
212
=head1 AUTHOR
213
213
214
Koha Development Team <http://koha-community.org/>
214
Koha Development Team <https://koha-community.org/>
215
215
216
Galen Charlton <galen.charlton@liblime.com> refactoring code by Andrew Moore.
216
Galen Charlton <galen.charlton@liblime.com> refactoring code by Andrew Moore.
217
217
(-)a/C4/HTML5Media.pm (-1 / +1 lines)
Lines 15-21 package C4::HTML5Media; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/C4/Heading.pm (-2 / +2 lines)
Lines 15-21 package C4::Heading; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
Lines 294-300 sub _marc_format_handler { Link Here
294
294
295
=head1 AUTHOR
295
=head1 AUTHOR
296
296
297
Koha Development Team <http://koha-community.org/>
297
Koha Development Team <https://koha-community.org/>
298
298
299
Galen Charlton <galen.charlton@liblime.com>
299
Galen Charlton <galen.charlton@liblime.com>
300
300
(-)a/C4/Heading/MARC21.pm (-2 / +2 lines)
Lines 15-21 package C4::Heading::MARC21; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
Lines 464-470 sub _get_display_heading { Link Here
464
464
465
=head1 AUTHOR
465
=head1 AUTHOR
466
466
467
Koha Development Team <http://koha-community.org/>
467
Koha Development Team <https://koha-community.org/>
468
468
469
Galen Charlton <galen.charlton@liblime.com>
469
Galen Charlton <galen.charlton@liblime.com>
470
470
(-)a/C4/Heading/UNIMARC.pm (-2 / +2 lines)
Lines 15-21 package C4::Heading::UNIMARC; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use 5.010;
20
use 5.010;
21
use strict;
21
use strict;
Lines 210-216 sub _get_display_heading { Link Here
210
210
211
=head1 AUTHOR
211
=head1 AUTHOR
212
212
213
Koha Development Team <http://koha-community.org/>
213
Koha Development Team <https://koha-community.org/>
214
214
215
Jared Camins-Esakov <jcamins@cpbibliography.com>
215
Jared Camins-Esakov <jcamins@cpbibliography.com>
216
216
(-)a/C4/HoldsQueue.pm (-1 / +1 lines)
Lines 15-21 package C4::HoldsQueue; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
# FIXME: expand perldoc, explain intended logic
20
# FIXME: expand perldoc, explain intended logic
21
21
(-)a/C4/ILSDI/Services.pm (-1 / +1 lines)
Lines 15-21 package C4::ILSDI::Services; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/C4/ImportBatch.pm (-2 / +2 lines)
Lines 15-21 package C4::ImportBatch; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
Lines 1885-1891 __END__ Link Here
1885
1885
1886
=head1 AUTHOR
1886
=head1 AUTHOR
1887
1887
1888
Koha Development Team <http://koha-community.org/>
1888
Koha Development Team <https://koha-community.org/>
1889
1889
1890
Galen Charlton <galen.charlton@liblime.com>
1890
Galen Charlton <galen.charlton@liblime.com>
1891
1891
(-)a/C4/ImportExportFramework.pm (-2 / +2 lines)
Lines 15-21 package C4::ImportExportFramework; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
Lines 1244-1250 __END__ Link Here
1244
1244
1245
=head1 AUTHOR
1245
=head1 AUTHOR
1246
1246
1247
Koha Development Team <http://koha-community.org/>
1247
Koha Development Team <https://koha-community.org/>
1248
1248
1249
=cut
1249
=cut
1250
1250
(-)a/C4/InstallAuth.pm (-1 / +1 lines)
Lines 15-21 package C4::InstallAuth; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI::Session;
21
use CGI::Session;
(-)a/C4/Installer.pm (-2 / +2 lines)
Lines 15-21 package C4::Installer; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
Lines 1193-1199 sub has_non_dynamic_row_format { Link Here
1193
C4::Installer is a refactoring of logic originally from installer/installer.pl, which was
1193
C4::Installer is a refactoring of logic originally from installer/installer.pl, which was
1194
originally written by Henri-Damien Laurant.
1194
originally written by Henri-Damien Laurant.
1195
1195
1196
Koha Development Team <http://koha-community.org/>
1196
Koha Development Team <https://koha-community.org/>
1197
1197
1198
Galen Charlton <galen.charlton@liblime.com>
1198
Galen Charlton <galen.charlton@liblime.com>
1199
1199
(-)a/C4/Installer/PerlModules.pm (-1 / +1 lines)
Lines 199-205 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the Link Here
199
GNU General Public License for more details.
199
GNU General Public License for more details.
200
200
201
You should have received a copy of the GNU General Public License
201
You should have received a copy of the GNU General Public License
202
along with Koha; if not, see <http://www.gnu.org/licenses>.
202
along with Koha; if not, see <https://www.gnu.org/licenses>.
203
203
204
=head1 DISCLAIMER OF WARRANTY
204
=head1 DISCLAIMER OF WARRANTY
205
205
(-)a/C4/Installer/UpgradeBackup.pm (-2 / +2 lines)
Lines 15-21 package C4::Installer::UpgradeBackup; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use File::Compare qw( compare );
21
use File::Compare qw( compare );
Lines 93-99 Code based on parts of ExtUtils::Install in order to Link Here
93
approximately track how it identifies files to
93
approximately track how it identifies files to
94
install.
94
install.
95
95
96
Koha Development Team <http://koha-community.org/>
96
Koha Development Team <https://koha-community.org/>
97
97
98
Galen Charlton <galen.charlton@liblime.com>
98
Galen Charlton <galen.charlton@liblime.com>
99
99
(-)a/C4/ItemCirculationAlertPreference.pm (-1 / +1 lines)
Lines 15-21 package C4::ItemCirculationAlertPreference; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/C4/Items.pm (-1 / +1 lines)
Lines 16-22 package C4::Items; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/C4/Koha.pm (-1 / +1 lines)
Lines 17-23 package C4::Koha; Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
23
(-)a/C4/Labels/Label.pm (-1 / +1 lines)
Lines 861-867 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the Link Here
861
GNU General Public License for more details.
861
GNU General Public License for more details.
862
862
863
You should have received a copy of the GNU General Public License
863
You should have received a copy of the GNU General Public License
864
along with Koha; if not, see <http://www.gnu.org/licenses>.
864
along with Koha; if not, see <https://www.gnu.org/licenses>.
865
865
866
=head1 DISCLAIMER OF WARRANTY
866
=head1 DISCLAIMER OF WARRANTY
867
867
(-)a/C4/Languages.pm (-1 / +1 lines)
Lines 16-22 package C4::Languages; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use strict;
21
use strict;
22
use warnings;
22
use warnings;
(-)a/C4/Letters.pm (-1 / +1 lines)
Lines 15-21 package C4::Letters; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/C4/Linker.pm (-1 / +1 lines)
Lines 15-21 package C4::Linker; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/C4/Linker/Default.pm (-1 / +1 lines)
Lines 15-21 package C4::Linker::Default; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/C4/Linker/FirstMatch.pm (-1 / +1 lines)
Lines 15-21 package C4::Linker::FirstMatch; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/C4/Linker/LastMatch.pm (-1 / +1 lines)
Lines 15-21 package C4::Linker::LastMatch; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/C4/Log.pm (-2 / +2 lines)
Lines 18-24 package C4::Log; Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
use strict;
23
use strict;
24
use warnings;
24
use warnings;
Lines 203-208 __END__ Link Here
203
203
204
=head1 AUTHOR
204
=head1 AUTHOR
205
205
206
Koha Development Team <http://koha-community.org/>
206
Koha Development Team <https://koha-community.org/>
207
207
208
=cut
208
=cut
(-)a/C4/MarcModificationTemplates.pm (-1 / +1 lines)
Lines 15-21 package C4::MarcModificationTemplates; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/C4/Matcher.pm (-2 / +2 lines)
Lines 15-21 package C4::Matcher; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
Lines 980-986 __END__ Link Here
980
980
981
=head1 AUTHOR
981
=head1 AUTHOR
982
982
983
Koha Development Team <http://koha-community.org/>
983
Koha Development Team <https://koha-community.org/>
984
984
985
Galen Charlton <galen.charlton@liblime.com>
985
Galen Charlton <galen.charlton@liblime.com>
986
986
(-)a/C4/Members.pm (-1 / +1 lines)
Lines 17-23 package C4::Members; Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
use C4::Context;
23
use C4::Context;
(-)a/C4/Members/Messaging.pm (-2 / +2 lines)
Lines 15-21 package C4::Members::Messaging; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
Lines 337-343 L<C4::Letters> Link Here
337
337
338
=head1 AUTHOR
338
=head1 AUTHOR
339
339
340
Koha Development Team <http://koha-community.org/>
340
Koha Development Team <https://koha-community.org/>
341
341
342
Andrew Moore <andrew.moore@liblime.com>
342
Andrew Moore <andrew.moore@liblime.com>
343
343
(-)a/C4/Members/Statistics.pm (-1 / +1 lines)
Lines 14-20 package C4::Members::Statistics; Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
=head1 NAME
19
=head1 NAME
20
20
(-)a/C4/Message.pm (-1 / +1 lines)
Lines 16-22 package C4::Message; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use strict;
21
use strict;
22
use warnings;
22
use warnings;
(-)a/C4/OAI/Sets.pm (-1 / +1 lines)
Lines 15-21 package C4::OAI::Sets; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/C4/Output.pm (-2 / +2 lines)
Lines 19-25 package C4::Output; Link Here
19
# GNU General Public License for more details.
19
# GNU General Public License for more details.
20
#
20
#
21
# You should have received a copy of the GNU General Public License
21
# You should have received a copy of the GNU General Public License
22
# along with Koha; if not, see <http://www.gnu.org/licenses>.
22
# along with Koha; if not, see <https://www.gnu.org/licenses>.
23
23
24
# NOTE: I'm pretty sure this module is deprecated in favor of
24
# NOTE: I'm pretty sure this module is deprecated in favor of
25
# templates.
25
# templates.
Lines 438-443 __END__ Link Here
438
438
439
=head1 AUTHOR
439
=head1 AUTHOR
440
440
441
Koha Development Team <http://koha-community.org/>
441
Koha Development Team <https://koha-community.org/>
442
442
443
=cut
443
=cut
(-)a/C4/Output/JSONStream.pm (-1 / +1 lines)
Lines 15-21 package C4::Output::JSONStream; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/C4/Overdues.pm (-2 / +2 lines)
Lines 16-22 package C4::Overdues; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
use Date::Calc                    qw( Today );
22
use Date::Calc                    qw( Today );
Lines 898-903 __END__ Link Here
898
898
899
=head1 AUTHOR
899
=head1 AUTHOR
900
900
901
Koha Development Team <http://koha-community.org/>
901
Koha Development Team <https://koha-community.org/>
902
902
903
=cut
903
=cut
(-)a/C4/Patroncards/Lib.pm (-1 / +1 lines)
Lines 15-21 package C4::Patroncards::Lib; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/C4/Patroncards/Patroncard.pm (-1 / +1 lines)
Lines 15-21 package C4::Patroncards::Patroncard; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/C4/Record.pm (-1 / +1 lines)
Lines 17-23 package C4::Record; Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
23
(-)a/C4/Reports.pm (-1 / +1 lines)
Lines 15-21 package C4::Reports; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI qw ( -utf8 );
21
use CGI qw ( -utf8 );
(-)a/C4/Reports/Guided.pm (-1 / +1 lines)
Lines 15-21 package C4::Reports::Guided; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/C4/Reserves.pm (-2 / +2 lines)
Lines 18-24 package C4::Reserves; Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
use Modern::Perl;
23
use Modern::Perl;
24
24
Lines 2406-2412 sub GetMaxPatronHoldsForRecord { Link Here
2406
2406
2407
=head1 AUTHOR
2407
=head1 AUTHOR
2408
2408
2409
Koha Development Team <http://koha-community.org/>
2409
Koha Development Team <https://koha-community.org/>
2410
2410
2411
=cut
2411
=cut
2412
2412
(-)a/C4/Ris.pm (-1 / +1 lines)
Lines 55-61 package C4::Ris; Link Here
55
# GNU General Public License for more details.
55
# GNU General Public License for more details.
56
#
56
#
57
# You should have received a copy of the GNU General Public License
57
# You should have received a copy of the GNU General Public License
58
# along with Koha; if not, see <http://www.gnu.org/licenses>.
58
# along with Koha; if not, see <https://www.gnu.org/licenses>.
59
#
59
#
60
#
60
#
61
61
(-)a/C4/RotatingCollections.pm (-1 / +1 lines)
Lines 20-26 package C4::RotatingCollections; Link Here
20
# GNU General Public License for more details.
20
# GNU General Public License for more details.
21
#
21
#
22
# You should have received a copy of the GNU General Public License
22
# You should have received a copy of the GNU General Public License
23
# along with Koha; if not, see <http://www.gnu.org/licenses>.
23
# along with Koha; if not, see <https://www.gnu.org/licenses>.
24
24
25
use Modern::Perl;
25
use Modern::Perl;
26
26
(-)a/C4/SIP/ILS/Transaction/FeePayment.pm (-1 / +1 lines)
Lines 18-24 use strict; Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
use Try::Tiny;
23
use Try::Tiny;
24
24
(-)a/C4/SMS.pm (-1 / +1 lines)
Lines 17-23 package C4::SMS; Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
=head1 NAME
22
=head1 NAME
23
23
(-)a/C4/Scheduler.pm (-1 / +1 lines)
Lines 15-21 package C4::Scheduler; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/C4/Scrubber.pm (-1 / +1 lines)
Lines 17-23 package C4::Scrubber; Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use strict;
22
use strict;
23
use warnings;
23
use warnings;
(-)a/C4/Search.pm (-2 / +2 lines)
Lines 13-19 package C4::Search; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use C4::Context;
19
use C4::Context;
Lines 2421-2426 __END__ Link Here
2421
2421
2422
=head1 AUTHOR
2422
=head1 AUTHOR
2423
2423
2424
Koha Development Team <http://koha-community.org/>
2424
Koha Development Team <https://koha-community.org/>
2425
2425
2426
=cut
2426
=cut
(-)a/C4/Search/History.pm (-1 / +1 lines)
Lines 341-344 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the Link Here
341
GNU General Public License for more details.
341
GNU General Public License for more details.
342
342
343
You should have received a copy of the GNU General Public License
343
You should have received a copy of the GNU General Public License
344
along with Koha; if not, see <http://www.gnu.org/licenses>.
344
along with Koha; if not, see <https://www.gnu.org/licenses>.
(-)a/C4/Search/PazPar2.pm (-2 / +2 lines)
Lines 15-21 package C4::Search::PazPar2; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
Lines 209-215 sub termlist { Link Here
209
209
210
=head1 AUTHOR
210
=head1 AUTHOR
211
211
212
Koha Development Team <http://koha-community.org/>
212
Koha Development Team <https://koha-community.org/>
213
213
214
Galen Charlton <galen.charlton@liblime.com>
214
Galen Charlton <galen.charlton@liblime.com>
215
215
(-)a/C4/Serials.pm (-2 / +2 lines)
Lines 16-22 package C4::Serials; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
Lines 2827-2832 __END__ Link Here
2827
2827
2828
=head1 AUTHOR
2828
=head1 AUTHOR
2829
2829
2830
Koha Development Team <http://koha-community.org/>
2830
Koha Development Team <https://koha-community.org/>
2831
2831
2832
=cut
2832
=cut
(-)a/C4/Serials/Frequency.pm (-1 / +1 lines)
Lines 15-21 package C4::Serials::Frequency; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/C4/Serials/Numberpattern.pm (-1 / +1 lines)
Lines 15-21 package C4::Serials::Numberpattern; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/C4/Service.pm (-1 / +1 lines)
Lines 15-21 package C4::Service; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/C4/ShelfBrowser.pm (-1 / +1 lines)
Lines 15-21 package C4::ShelfBrowser; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/C4/SocialData.pm (-1 / +1 lines)
Lines 13-19 package C4::SocialData; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/C4/Stats.pm (-2 / +2 lines)
Lines 15-21 package C4::Stats; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
Lines 64-69 __END__ Link Here
64
64
65
=head1 AUTHOR
65
=head1 AUTHOR
66
66
67
Koha Development Team <http://koha-community.org/>
67
Koha Development Team <https://koha-community.org/>
68
68
69
=cut
69
=cut
(-)a/C4/Suggestions.pm (-2 / +2 lines)
Lines 16-22 package C4::Suggestions; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
use CGI qw ( -utf8 );
22
use CGI qw ( -utf8 );
Lines 455-461 __END__ Link Here
455
455
456
=head1 AUTHOR
456
=head1 AUTHOR
457
457
458
Koha Development Team <http://koha-community.org/>
458
Koha Development Team <https://koha-community.org/>
459
459
460
=cut
460
=cut
461
461
(-)a/C4/TTParser.pm (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
#simple parser for HTML with Template Toolkit directives. Tokens are put into @tokens and are accessible via next_token and peep_token
18
#simple parser for HTML with Template Toolkit directives. Tokens are put into @tokens and are accessible via next_token and peep_token
19
package C4::TTParser;
19
package C4::TTParser;
(-)a/C4/Tags.pm (-1 / +1 lines)
Lines 16-22 package C4::Tags; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use strict;
21
use strict;
22
use warnings;
22
use warnings;
(-)a/C4/Templates.pm (-1 / +1 lines)
Lines 21-27 use List::MoreUtils qw( uniq ); Link Here
21
# GNU General Public License for more details.
21
# GNU General Public License for more details.
22
#
22
#
23
# You should have received a copy of the GNU General Public License
23
# You should have received a copy of the GNU General Public License
24
# along with Koha; if not, see <http://www.gnu.org/licenses>.
24
# along with Koha; if not, see <https://www.gnu.org/licenses>.
25
25
26
=head1 NAME 
26
=head1 NAME 
27
27
(-)a/C4/TmplToken.pm (-1 / +1 lines)
Lines 15-21 package C4::TmplToken; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/C4/TmplTokenType.pm (-1 / +1 lines)
Lines 15-21 package C4::TmplTokenType; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
require Exporter;
21
require Exporter;
(-)a/C4/UsageStats.pm (-1 / +1 lines)
Lines 15-21 package C4::UsageStats; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use C4::Context;
21
use C4::Context;
(-)a/C4/Utils/DataTables/VirtualShelves.pm (-1 / +1 lines)
Lines 209-212 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the Link Here
209
GNU General Public License for more details.
209
GNU General Public License for more details.
210
210
211
You should have received a copy of the GNU General Public License
211
You should have received a copy of the GNU General Public License
212
along with Koha; if not, see <http://www.gnu.org/licenses>.
212
along with Koha; if not, see <https://www.gnu.org/licenses>.
(-)a/C4/XISBN.pm (-1 / +1 lines)
Lines 16-22 package C4::XISBN; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
use XML::Simple;
22
use XML::Simple;
(-)a/C4/XSLT.pm (-2 / +2 lines)
Lines 19-25 package C4::XSLT; Link Here
19
# GNU General Public License for more details.
19
# GNU General Public License for more details.
20
#
20
#
21
# You should have received a copy of the GNU General Public License
21
# You should have received a copy of the GNU General Public License
22
# along with Koha; if not, see <http://www.gnu.org/licenses>.
22
# along with Koha; if not, see <https://www.gnu.org/licenses>.
23
23
24
use Modern::Perl;
24
use Modern::Perl;
25
25
Lines 419-424 __END__ Link Here
419
419
420
Joshua Ferraro <jmf@liblime.com>
420
Joshua Ferraro <jmf@liblime.com>
421
421
422
Koha Development Team <http://koha-community.org/>
422
Koha Development Team <https://koha-community.org/>
423
423
424
=cut
424
=cut
(-)a/Koha.pm (-1 / +1 lines)
Lines 16-22 package Koha; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/Koha/Account.pm (-1 / +1 lines)
Lines 15-21 package Koha::Account; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Account/Credit.pm (-1 / +1 lines)
Lines 15-21 package Koha::Account::Credit; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Account/CreditType.pm (-1 / +1 lines)
Lines 15-21 package Koha::Account::CreditType; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Account/CreditTypes.pm (-1 / +1 lines)
Lines 15-21 package Koha::Account::CreditTypes; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Account/Credits.pm (-1 / +1 lines)
Lines 13-19 package Koha::Account::Credits; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Account/Debit.pm (-1 / +1 lines)
Lines 15-21 package Koha::Account::Debit; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Account/DebitType.pm (-1 / +1 lines)
Lines 15-21 package Koha::Account::DebitType; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Account/DebitTypes.pm (-1 / +1 lines)
Lines 15-21 package Koha::Account::DebitTypes; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Account/Debits.pm (-1 / +1 lines)
Lines 13-19 package Koha::Account::Debits; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Account/Line.pm (-1 / +1 lines)
Lines 13-19 package Koha::Account::Line; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Account/Lines.pm (-1 / +1 lines)
Lines 13-19 package Koha::Account::Lines; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Account/Offset.pm (-1 / +1 lines)
Lines 13-19 package Koha::Account::Offset; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Account/Offsets.pm (-1 / +1 lines)
Lines 13-19 package Koha::Account::Offsets; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Acquisition/Basket.pm (-1 / +1 lines)
Lines 15-21 package Koha::Acquisition::Basket; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Acquisition/BasketGroup.pm (-1 / +1 lines)
Lines 13-19 package Koha::Acquisition::BasketGroup; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Acquisition/BasketGroups.pm (-1 / +1 lines)
Lines 13-19 package Koha::Acquisition::BasketGroups; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Acquisition/Baskets.pm (-1 / +1 lines)
Lines 15-21 package Koha::Acquisition::Baskets; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Acquisition/Bookseller.pm (-1 / +1 lines)
Lines 13-19 package Koha::Acquisition::Bookseller; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Acquisition/Bookseller/Alias.pm (-1 / +1 lines)
Lines 13-19 package Koha::Acquisition::Bookseller::Alias; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Acquisition/Bookseller/Aliases.pm (-1 / +1 lines)
Lines 13-19 package Koha::Acquisition::Bookseller::Aliases; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Acquisition/Bookseller/Interface.pm (-1 / +1 lines)
Lines 13-19 package Koha::Acquisition::Bookseller::Interface; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use Encode qw(decode_utf8);
19
use Encode qw(decode_utf8);
(-)a/Koha/Acquisition/Bookseller/Interfaces.pm (-1 / +1 lines)
Lines 13-19 package Koha::Acquisition::Bookseller::Interfaces; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Acquisition/Bookseller/Issue.pm (-1 / +1 lines)
Lines 13-19 package Koha::Acquisition::Bookseller::Issue; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Acquisition/Bookseller/Issues.pm (-1 / +1 lines)
Lines 13-19 package Koha::Acquisition::Bookseller::Issues; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Acquisition/Booksellers.pm (-1 / +1 lines)
Lines 13-19 package Koha::Acquisition::Booksellers; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Acquisition/Budget.pm (-1 / +1 lines)
Lines 13-19 package Koha::Acquisition::Budget; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Acquisition/Budgets.pm (-1 / +1 lines)
Lines 13-19 package Koha::Acquisition::Budgets; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Acquisition/Currencies.pm (-1 / +1 lines)
Lines 13-19 package Koha::Acquisition::Currencies; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Acquisition/Currency.pm (-1 / +1 lines)
Lines 13-19 package Koha::Acquisition::Currency; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Acquisition/Fund.pm (-1 / +1 lines)
Lines 13-19 package Koha::Acquisition::Fund; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Acquisition/Funds.pm (-1 / +1 lines)
Lines 13-19 package Koha::Acquisition::Funds; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Acquisition/Invoice.pm (-1 / +1 lines)
Lines 13-19 package Koha::Acquisition::Invoice; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Acquisition/Invoice/Adjustment.pm (-1 / +1 lines)
Lines 13-19 package Koha::Acquisition::Invoice::Adjustment; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Acquisition/Invoice/Adjustments.pm (-1 / +1 lines)
Lines 13-19 package Koha::Acquisition::Invoice::Adjustments; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use Koha::Acquisition::Invoice::Adjustment;
19
use Koha::Acquisition::Invoice::Adjustment;
(-)a/Koha/Acquisition/Invoices.pm (-1 / +1 lines)
Lines 13-19 package Koha::Acquisition::Invoices; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Acquisition/Order.pm (-1 / +1 lines)
Lines 13-19 package Koha::Acquisition::Order; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Acquisition/Order/Claim.pm (-1 / +1 lines)
Lines 13-19 package Koha::Acquisition::Order::Claim; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Acquisition/Order/Claims.pm (-1 / +1 lines)
Lines 13-19 package Koha::Acquisition::Order::Claims; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Acquisition/Orders.pm (-1 / +1 lines)
Lines 13-19 package Koha::Acquisition::Orders; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ActionLog.pm (-1 / +1 lines)
Lines 15-21 package Koha::ActionLog; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ActionLogs.pm (-1 / +1 lines)
Lines 15-21 package Koha::ActionLogs; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/AdditionalContent.pm (-1 / +1 lines)
Lines 15-21 package Koha::AdditionalContent; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/AdditionalContents.pm (-1 / +1 lines)
Lines 15-21 package Koha::AdditionalContents; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/AdditionalContentsLocalization.pm (-1 / +1 lines)
Lines 13-19 package Koha::AdditionalContentsLocalization; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/AdditionalContentsLocalizations.pm (-1 / +1 lines)
Lines 13-19 package Koha::AdditionalContentsLocalizations; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/AdditionalField.pm (-2 / +2 lines)
Lines 93-99 sub _type { 'AdditionalField' } Link Here
93
93
94
=head1 AUTHOR
94
=head1 AUTHOR
95
95
96
Koha Development Team <http://koha-community.org/>
96
Koha Development Team <https://koha-community.org/>
97
97
98
=head1 COPYRIGHT AND LICENSE
98
=head1 COPYRIGHT AND LICENSE
99
99
Lines 111-117 WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR Link Here
111
A PARTICULAR PURPOSE. See the GNU General Public License for more details.
111
A PARTICULAR PURPOSE. See the GNU General Public License for more details.
112
112
113
You should have received a copy of the GNU General Public License along
113
You should have received a copy of the GNU General Public License along
114
with Koha; if not, see <http://www.gnu.org/licenses>.
114
with Koha; if not, see <https://www.gnu.org/licenses>.
115
115
116
=head1 SEE ALSO
116
=head1 SEE ALSO
117
117
(-)a/Koha/AdditionalFieldValue.pm (-2 / +2 lines)
Lines 38-44 sub _type { 'AdditionalFieldValue' } Link Here
38
38
39
=head1 AUTHOR
39
=head1 AUTHOR
40
40
41
Koha Development Team <http://koha-community.org/>
41
Koha Development Team <https://koha-community.org/>
42
42
43
=head1 COPYRIGHT AND LICENSE
43
=head1 COPYRIGHT AND LICENSE
44
44
Lines 56-62 WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR Link Here
56
A PARTICULAR PURPOSE. See the GNU General Public License for more details.
56
A PARTICULAR PURPOSE. See the GNU General Public License for more details.
57
57
58
You should have received a copy of the GNU General Public License along
58
You should have received a copy of the GNU General Public License along
59
with Koha; if not, see <http://www.gnu.org/licenses>.
59
with Koha; if not, see <https://www.gnu.org/licenses>.
60
60
61
=head1 SEE ALSO
61
=head1 SEE ALSO
62
62
(-)a/Koha/AdditionalFieldValues.pm (-2 / +2 lines)
Lines 24-30 sub object_class { 'Koha::AdditionalFieldValue' } Link Here
24
24
25
=head1 AUTHOR
25
=head1 AUTHOR
26
26
27
Koha Development Team <http://koha-community.org/>
27
Koha Development Team <https://koha-community.org/>
28
28
29
=head1 COPYRIGHT AND LICENSE
29
=head1 COPYRIGHT AND LICENSE
30
30
Lines 42-48 WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR Link Here
42
A PARTICULAR PURPOSE. See the GNU General Public License for more details.
42
A PARTICULAR PURPOSE. See the GNU General Public License for more details.
43
43
44
You should have received a copy of the GNU General Public License along
44
You should have received a copy of the GNU General Public License along
45
with Koha; if not, see <http://www.gnu.org/licenses>.
45
with Koha; if not, see <https://www.gnu.org/licenses>.
46
46
47
=head1 SEE ALSO
47
=head1 SEE ALSO
48
48
(-)a/Koha/AdditionalFields.pm (-2 / +2 lines)
Lines 24-30 sub object_class { 'Koha::AdditionalField' } Link Here
24
24
25
=head1 AUTHOR
25
=head1 AUTHOR
26
26
27
Koha Development Team <http://koha-community.org/>
27
Koha Development Team <https://koha-community.org/>
28
28
29
=head1 COPYRIGHT AND LICENSE
29
=head1 COPYRIGHT AND LICENSE
30
30
Lines 42-48 WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR Link Here
42
A PARTICULAR PURPOSE. See the GNU General Public License for more details.
42
A PARTICULAR PURPOSE. See the GNU General Public License for more details.
43
43
44
You should have received a copy of the GNU General Public License along
44
You should have received a copy of the GNU General Public License along
45
with Koha; if not, see <http://www.gnu.org/licenses>.
45
with Koha; if not, see <https://www.gnu.org/licenses>.
46
46
47
=head1 SEE ALSO
47
=head1 SEE ALSO
48
48
(-)a/Koha/AdvancedEditorMacro.pm (-1 / +1 lines)
Lines 12-18 package Koha::AdvancedEditorMacro; Link Here
12
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
12
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
13
#
13
#
14
# You should have received a copy of the GNU General Public License
14
# You should have received a copy of the GNU General Public License
15
# along with Koha; if not, see <http://www.gnu.org/licenses>.
15
# along with Koha; if not, see <https://www.gnu.org/licenses>.
16
16
17
use Modern::Perl;
17
use Modern::Perl;
18
18
(-)a/Koha/AdvancedEditorMacros.pm (-1 / +1 lines)
Lines 12-18 package Koha::AdvancedEditorMacros; Link Here
12
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
12
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
13
#
13
#
14
# You should have received a copy of the GNU General Public License
14
# You should have received a copy of the GNU General Public License
15
# along with Koha; if not, see <http://www.gnu.org/licenses>.
15
# along with Koha; if not, see <https://www.gnu.org/licenses>.
16
16
17
use Modern::Perl;
17
use Modern::Perl;
18
18
(-)a/Koha/ApiKey.pm (-1 / +1 lines)
Lines 15-21 package Koha::ApiKey; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ApiKeys.pm (-1 / +1 lines)
Lines 15-21 package Koha::ApiKeys; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/App/Intranet.pm (-1 / +1 lines)
Lines 15-21 package Koha::App::Intranet; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/App/Opac.pm (-1 / +1 lines)
Lines 15-21 package Koha::App::Opac; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/App/Plugin/CGIBinKoha.pm (-1 / +1 lines)
Lines 15-21 package Koha::App::Plugin::CGIBinKoha; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/App/Plugin/CSRF.pm (-1 / +1 lines)
Lines 13-19 package Koha::App::Plugin::CSRF; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
=head1 NAME
18
=head1 NAME
19
19
(-)a/Koha/App/Plugin/Language.pm (-1 / +1 lines)
Lines 15-21 package Koha::App::Plugin::Language; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/App/Plugin/RESTV1.pm (-1 / +1 lines)
Lines 15-21 package Koha::App::Plugin::RESTV1; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ArticleRequest.pm (-1 / +1 lines)
Lines 15-21 package Koha::ArticleRequest; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ArticleRequest/Status.pm (-1 / +1 lines)
Lines 15-21 package Koha::ArticleRequest::Status; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ArticleRequests.pm (-1 / +1 lines)
Lines 15-21 package Koha::ArticleRequests; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/AudioAlert.pm (-1 / +1 lines)
Lines 15-21 package Koha::AudioAlert; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/AudioAlerts.pm (-1 / +1 lines)
Lines 15-21 package Koha::AudioAlerts; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Auth/Client.pm (-1 / +1 lines)
Lines 15-21 package Koha::Auth::Client; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Auth/Client/OAuth.pm (-1 / +1 lines)
Lines 15-21 package Koha::Auth::Client::OAuth; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Auth/Identity/Provider.pm (-1 / +1 lines)
Lines 15-21 package Koha::Auth::Identity::Provider; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Auth/Identity/Provider/Domain.pm (-1 / +1 lines)
Lines 15-21 package Koha::Auth::Identity::Provider::Domain; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Auth/Identity/Provider/Domains.pm (-1 / +1 lines)
Lines 15-21 package Koha::Auth::Identity::Provider::Domains; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Auth/Identity/Provider/OAuth.pm (-1 / +1 lines)
Lines 15-21 package Koha::Auth::Identity::Provider::OAuth; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Auth/Identity/Provider/OIDC.pm (-1 / +1 lines)
Lines 15-21 package Koha::Auth::Identity::Provider::OIDC; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Auth/Identity/Providers.pm (-1 / +1 lines)
Lines 15-21 package Koha::Auth::Identity::Providers; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Auth/Permissions.pm (-1 / +1 lines)
Lines 13-19 package Koha::Auth::Permissions; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Auth/TwoFactorAuth.pm (-1 / +1 lines)
Lines 13-19 package Koha::Auth::TwoFactorAuth; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use GD::Barcode;
19
use GD::Barcode;
(-)a/Koha/AuthUtils.pm (-1 / +1 lines)
Lines 15-21 package Koha::AuthUtils; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use Crypt::Eksblowfish::Bcrypt qw( bcrypt en_base64 );
21
use Crypt::Eksblowfish::Bcrypt qw( bcrypt en_base64 );
(-)a/Koha/AuthorisedValue.pm (-1 / +1 lines)
Lines 15-21 package Koha::AuthorisedValue; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/AuthorisedValueCategories.pm (-1 / +1 lines)
Lines 13-19 package Koha::AuthorisedValueCategories; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/AuthorisedValueCategory.pm (-1 / +1 lines)
Lines 13-19 package Koha::AuthorisedValueCategory; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/AuthorisedValues.pm (-1 / +1 lines)
Lines 15-21 package Koha::AuthorisedValues; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Authorities.pm (-1 / +1 lines)
Lines 15-21 package Koha::Authorities; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Authority.pm (-1 / +1 lines)
Lines 15-21 package Koha::Authority; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Authority/ControlledIndicators.pm (-1 / +1 lines)
Lines 15-21 package Koha::Authority::ControlledIndicators; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use C4::Context;
21
use C4::Context;
(-)a/Koha/Authority/MergeRequest.pm (-1 / +1 lines)
Lines 15-21 package Koha::Authority::MergeRequest; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Authority/MergeRequests.pm (-1 / +1 lines)
Lines 15-21 package Koha::Authority::MergeRequests; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use MARC::File::XML;
21
use MARC::File::XML;
(-)a/Koha/Authority/Subfield.pm (-1 / +1 lines)
Lines 13-19 package Koha::Authority::Subfield; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Authority/Subfields.pm (-1 / +1 lines)
Lines 13-19 package Koha::Authority::Subfields; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Authority/Tag.pm (-1 / +1 lines)
Lines 13-19 package Koha::Authority::Tag; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Authority/Tags.pm (-1 / +1 lines)
Lines 13-19 package Koha::Authority::Tags; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Authority/Type.pm (-1 / +1 lines)
Lines 13-19 package Koha::Authority::Type; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Authority/Types.pm (-1 / +1 lines)
Lines 13-19 package Koha::Authority::Types; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/BackgroundJob.pm (-1 / +1 lines)
Lines 13-19 package Koha::BackgroundJob; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use Encode qw();
19
use Encode qw();
(-)a/Koha/BackgroundJob/BatchCancelHold.pm (-1 / +1 lines)
Lines 13-19 package Koha::BackgroundJob::BatchCancelHold; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/BackgroundJob/BatchDeleteItem.pm (-1 / +1 lines)
Lines 13-19 package Koha::BackgroundJob::BatchDeleteItem; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
=head1 NAME
18
=head1 NAME
19
19
(-)a/Koha/BackgroundJob/BatchUpdateAuthority.pm (-1 / +1 lines)
Lines 13-19 package Koha::BackgroundJob::BatchUpdateAuthority; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/BackgroundJob/BatchUpdateBiblio.pm (-1 / +1 lines)
Lines 13-19 package Koha::BackgroundJob::BatchUpdateBiblio; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/BackgroundJob/BatchUpdateBiblioHoldsQueue.pm (-1 / +1 lines)
Lines 13-19 package Koha::BackgroundJob::BatchUpdateBiblioHoldsQueue; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/BackgroundJob/BatchUpdateItem.pm (-1 / +1 lines)
Lines 13-19 package Koha::BackgroundJob::BatchUpdateItem; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use List::MoreUtils qw( uniq );
19
use List::MoreUtils qw( uniq );
(-)a/Koha/BackgroundJob/CreateEHoldingsFromBiblios.pm (-1 / +1 lines)
Lines 13-19 package Koha::BackgroundJob::CreateEHoldingsFromBiblios; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use JSON qw( decode_json encode_json );
19
use JSON qw( decode_json encode_json );
(-)a/Koha/BackgroundJob/ErmSushiHarvester.pm (-1 / +1 lines)
Lines 13-19 package Koha::BackgroundJob::ErmSushiHarvester; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/BackgroundJob/ImportKBARTFile.pm (-1 / +1 lines)
Lines 13-19 package Koha::BackgroundJob::ImportKBARTFile; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use JSON         qw( decode_json encode_json );
19
use JSON         qw( decode_json encode_json );
(-)a/Koha/BackgroundJob/MARCImportCommitBatch.pm (-1 / +1 lines)
Lines 13-19 package Koha::BackgroundJob::MARCImportCommitBatch; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use Try::Tiny;
19
use Try::Tiny;
(-)a/Koha/BackgroundJob/MARCImportRevertBatch.pm (-1 / +1 lines)
Lines 13-19 package Koha::BackgroundJob::MARCImportRevertBatch; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use Try::Tiny;
19
use Try::Tiny;
(-)a/Koha/BackgroundJob/PseudonymizeStatistic.pm (-1 / +1 lines)
Lines 13-19 package Koha::BackgroundJob::PseudonymizeStatistic; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/BackgroundJob/StageMARCForImport.pm (-1 / +1 lines)
Lines 13-19 package Koha::BackgroundJob::StageMARCForImport; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use Try::Tiny;
19
use Try::Tiny;
(-)a/Koha/BackgroundJob/UpdateElasticIndex.pm (-1 / +1 lines)
Lines 13-19 package Koha::BackgroundJob::UpdateElasticIndex; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/BackgroundJobs.pm (-1 / +1 lines)
Lines 13-19 package Koha::BackgroundJobs; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Biblio.pm (-1 / +1 lines)
Lines 15-21 package Koha::Biblio; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Biblio/ItemGroup.pm (-1 / +1 lines)
Lines 13-19 package Koha::Biblio::ItemGroup; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Biblio/ItemGroup/Item.pm (-1 / +1 lines)
Lines 13-19 package Koha::Biblio::ItemGroup::Item; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Biblio/ItemGroup/Items.pm (-1 / +1 lines)
Lines 13-19 package Koha::Biblio::ItemGroup::Items; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Biblio/ItemGroups.pm (-1 / +1 lines)
Lines 13-19 package Koha::Biblio::ItemGroups; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Biblio/Metadata.pm (-1 / +1 lines)
Lines 13-19 package Koha::Biblio::Metadata; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Biblio/Metadata/Extractor.pm (-1 / +1 lines)
Lines 15-21 package Koha::Biblio::Metadata::Extractor; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/Biblio/Metadata/Extractor/MARC.pm (-1 / +1 lines)
Lines 15-21 package Koha::Biblio::Metadata::Extractor::MARC; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/Biblio/Metadata/Extractor/MARC/MARC21.pm (-1 / +1 lines)
Lines 15-21 package Koha::Biblio::Metadata::Extractor::MARC::MARC21; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/Biblio/Metadata/Extractor/MARC/UNIMARC.pm (-1 / +1 lines)
Lines 15-21 package Koha::Biblio::Metadata::Extractor::MARC::UNIMARC; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/Biblio/Metadatas.pm (-1 / +1 lines)
Lines 13-19 package Koha::Biblio::Metadatas; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/BiblioFramework.pm (-1 / +1 lines)
Lines 13-19 package Koha::BiblioFramework; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/BiblioFrameworks.pm (-1 / +1 lines)
Lines 13-19 package Koha::BiblioFrameworks; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/BiblioUtils.pm (-1 / +1 lines)
Lines 17-23 package Koha::BiblioUtils; Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
=head1 NAME
22
=head1 NAME
23
23
(-)a/Koha/Biblioitem.pm (-1 / +1 lines)
Lines 13-19 package Koha::Biblioitem; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Biblioitems.pm (-1 / +1 lines)
Lines 13-19 package Koha::Biblioitems; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Biblios.pm (-1 / +1 lines)
Lines 15-21 package Koha::Biblios; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Booking.pm (-1 / +1 lines)
Lines 15-21 package Koha::Booking; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Bookings.pm (-1 / +1 lines)
Lines 15-21 package Koha::Bookings; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Cache.pm (-1 / +1 lines)
Lines 16-22 package Koha::Cache; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
=head1 NAME
21
=head1 NAME
22
22
(-)a/Koha/Cache/Memory/Lite.pm (-1 / +1 lines)
Lines 15-21 package Koha::Cache::Memory::Lite; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/Cache/Object.pm (-1 / +1 lines)
Lines 15-21 package Koha::Cache::Object; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/Caches.pm (-1 / +1 lines)
Lines 13-19 package Koha::Caches; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
=head1 NAME
18
=head1 NAME
19
19
(-)a/Koha/Calendar.pm (-1 / +1 lines)
Lines 615-618 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the Link Here
615
GNU General Public License for more details.
615
GNU General Public License for more details.
616
616
617
You should have received a copy of the GNU General Public License
617
You should have received a copy of the GNU General Public License
618
along with Koha; if not, see <http://www.gnu.org/licenses>.
618
along with Koha; if not, see <https://www.gnu.org/licenses>.
(-)a/Koha/Cash/Register.pm (-1 / +1 lines)
Lines 13-19 package Koha::Cash::Register; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Cash/Register/Action.pm (-1 / +1 lines)
Lines 13-19 package Koha::Cash::Register::Action; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Cash/Register/Actions.pm (-1 / +1 lines)
Lines 13-19 package Koha::Cash::Register::Actions; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Cash/Register/Cashup.pm (-1 / +1 lines)
Lines 13-19 package Koha::Cash::Register::Cashup; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Cash/Register/Cashups.pm (-1 / +1 lines)
Lines 13-19 package Koha::Cash::Register::Cashups; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Cash/Registers.pm (-1 / +1 lines)
Lines 13-19 package Koha::Cash::Registers; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Charges/Fees.pm (-1 / +1 lines)
Lines 15-21 package Koha::Charges::Fees; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Charges/Sales.pm (-1 / +1 lines)
Lines 15-21 package Koha::Charges::Sales; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Checkout.pm (-1 / +1 lines)
Lines 16-22 package Koha::Checkout; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/Koha/Checkouts.pm (-1 / +1 lines)
Lines 15-21 package Koha::Checkouts; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Checkouts/Renewal.pm (-1 / +1 lines)
Lines 15-21 package Koha::Checkouts::Renewal; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Checkouts/Renewals.pm (-1 / +1 lines)
Lines 15-21 package Koha::Checkouts::Renewals; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with oha; if not, see <http://www.gnu.org/licenses>.
18
# along with oha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Checkouts/ReturnClaim.pm (-1 / +1 lines)
Lines 15-21 package Koha::Checkouts::ReturnClaim; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Checkouts/ReturnClaims.pm (-1 / +1 lines)
Lines 15-21 package Koha::Checkouts::ReturnClaims; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/CirculationRule.pm (-1 / +1 lines)
Lines 15-21 package Koha::CirculationRule; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/CirculationRules.pm (-1 / +1 lines)
Lines 15-21 package Koha::CirculationRules; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use Carp qw( croak );
21
use Carp qw( croak );
(-)a/Koha/Cities.pm (-1 / +1 lines)
Lines 13-19 package Koha::Cities; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/City.pm (-1 / +1 lines)
Lines 13-19 package Koha::City; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ClassSortRule.pm (-1 / +1 lines)
Lines 13-19 package Koha::ClassSortRule; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ClassSortRules.pm (-1 / +1 lines)
Lines 13-19 package Koha::ClassSortRules; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ClassSource.pm (-1 / +1 lines)
Lines 13-19 package Koha::ClassSource; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ClassSources.pm (-1 / +1 lines)
Lines 13-19 package Koha::ClassSources; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ClassSplitRule.pm (-1 / +1 lines)
Lines 13-19 package Koha::ClassSplitRule; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ClassSplitRules.pm (-1 / +1 lines)
Lines 13-19 package Koha::ClassSplitRules; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Club.pm (-1 / +1 lines)
Lines 15-21 package Koha::Club; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Club/Enrollment.pm (-1 / +1 lines)
Lines 15-21 package Koha::Club::Enrollment; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Club/Enrollment/Field.pm (-1 / +1 lines)
Lines 15-21 package Koha::Club::Enrollment::Field; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Club/Enrollment/Fields.pm (-1 / +1 lines)
Lines 15-21 package Koha::Club::Enrollment::Fields; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Club/Enrollments.pm (-1 / +1 lines)
Lines 15-21 package Koha::Club::Enrollments; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Club/Field.pm (-1 / +1 lines)
Lines 15-21 package Koha::Club::Field; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Club/Fields.pm (-1 / +1 lines)
Lines 15-21 package Koha::Club::Fields; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Club/Hold.pm (-1 / +1 lines)
Lines 15-21 package Koha::Club::Hold; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Club/Hold/PatronHold.pm (-1 / +1 lines)
Lines 15-21 package Koha::Club::Hold::PatronHold; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Club/Hold/PatronHolds.pm (-1 / +1 lines)
Lines 15-21 package Koha::Club::Hold::PatronHolds; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Club/Holds.pm (-1 / +1 lines)
Lines 15-21 package Koha::Club::Holds; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Club/Template.pm (-1 / +1 lines)
Lines 15-21 package Koha::Club::Template; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Club/Template/EnrollmentField.pm (-1 / +1 lines)
Lines 15-21 package Koha::Club::Template::EnrollmentField; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Club/Template/EnrollmentFields.pm (-1 / +1 lines)
Lines 15-21 package Koha::Club::Template::EnrollmentFields; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Club/Template/Field.pm (-1 / +1 lines)
Lines 15-21 package Koha::Club::Template::Field; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Club/Template/Fields.pm (-1 / +1 lines)
Lines 15-21 package Koha::Club::Template::Fields; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Club/Templates.pm (-1 / +1 lines)
Lines 15-21 package Koha::Club::Templates; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Clubs.pm (-1 / +1 lines)
Lines 15-21 package Koha::Clubs; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/CodeList/Unimarc/MediumOfPerformance.pm (-1 / +1 lines)
Lines 13-19 package Koha::CodeList::Unimarc::MediumOfPerformance; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use utf8;
19
use utf8;
(-)a/Koha/Config.pm (-1 / +1 lines)
Lines 13-19 package Koha::Config; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
=head1 NAME
18
=head1 NAME
19
19
(-)a/Koha/Config/SysPref.pm (-1 / +1 lines)
Lines 15-21 package Koha::Config::SysPref; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Config/SysPrefs.pm (-1 / +1 lines)
Lines 15-21 package Koha::Config::SysPrefs; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/CookieManager.pm (-1 / +1 lines)
Lines 15-21 package Koha::CookieManager; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI::Cookie;
21
use CGI::Cookie;
(-)a/Koha/CoverImage.pm (-1 / +1 lines)
Lines 13-19 package Koha::CoverImage; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/CoverImages.pm (-1 / +1 lines)
Lines 13-19 package Koha::CoverImages; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/CsvProfile.pm (-1 / +1 lines)
Lines 13-19 package Koha::CsvProfile; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/CsvProfiles.pm (-1 / +1 lines)
Lines 13-19 package Koha::CsvProfiles; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/CurbsidePickup.pm (-1 / +1 lines)
Lines 13-19 package Koha::CurbsidePickup; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/CurbsidePickupIssue.pm (-1 / +1 lines)
Lines 13-19 package Koha::CurbsidePickupIssue; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/CurbsidePickupIssues.pm (-1 / +1 lines)
Lines 13-19 package Koha::CurbsidePickupIssues; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/CurbsidePickupOpeningSlot.pm (-1 / +1 lines)
Lines 13-19 package Koha::CurbsidePickupOpeningSlot; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/CurbsidePickupOpeningSlots.pm (-1 / +1 lines)
Lines 13-19 package Koha::CurbsidePickupOpeningSlots; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/CurbsidePickupPolicies.pm (-1 / +1 lines)
Lines 13-19 package Koha::CurbsidePickupPolicies; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/CurbsidePickupPolicy.pm (-1 / +1 lines)
Lines 13-19 package Koha::CurbsidePickupPolicy; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/CurbsidePickups.pm (-1 / +1 lines)
Lines 13-19 package Koha::CurbsidePickups; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Database.pm (-1 / +1 lines)
Lines 16-22 package Koha::Database; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
=head1 NAME
21
=head1 NAME
22
22
(-)a/Koha/Database/Auditor.pm (-1 / +1 lines)
Lines 13-19 package Koha::Database::Auditor; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Database/Columns.pm (-1 / +1 lines)
Lines 13-19 package Koha::Database::Columns; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use Koha::I18N qw( __ );
19
use Koha::I18N qw( __ );
(-)a/Koha/Database/Commenter.pm (-1 / +1 lines)
Lines 15-21 package Koha::Database::Commenter; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use File::Slurp qw(read_file);
21
use File::Slurp qw(read_file);
(-)a/Koha/DateTime/Format/RFC3339.pm (-1 / +1 lines)
Lines 13-19 package Koha::DateTime::Format::RFC3339; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
=head1 NAME
18
=head1 NAME
19
19
(-)a/Koha/DateTime/Format/SQL.pm (-1 / +1 lines)
Lines 13-19 package Koha::DateTime::Format::SQL; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
=head1 NAME
18
=head1 NAME
19
19
(-)a/Koha/DateUtils.pm (-1 / +1 lines)
Lines 14-20 package Koha::DateUtils; Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
use DateTime;
20
use DateTime;
(-)a/Koha/Desk.pm (-1 / +1 lines)
Lines 14-20 package Koha::Desk; Link Here
14
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
14
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
20
(-)a/Koha/Desks.pm (-1 / +1 lines)
Lines 14-20 package Koha::Desks; Link Here
14
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
14
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
20
(-)a/Koha/EDI.pm (-1 / +1 lines)
Lines 15-21 package Koha::EDI; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/Koha/ERM/Agreement.pm (-1 / +1 lines)
Lines 13-19 package Koha::ERM::Agreement; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ERM/Agreement/License.pm (-1 / +1 lines)
Lines 13-19 package Koha::ERM::Agreement::License; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ERM/Agreement/Licenses.pm (-1 / +1 lines)
Lines 13-19 package Koha::ERM::Agreement::Licenses; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ERM/Agreement/Period.pm (-1 / +1 lines)
Lines 13-19 package Koha::ERM::Agreement::Period; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ERM/Agreement/Periods.pm (-1 / +1 lines)
Lines 13-19 package Koha::ERM::Agreement::Periods; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ERM/Agreement/Relationship.pm (-1 / +1 lines)
Lines 13-19 package Koha::ERM::Agreement::Relationship; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ERM/Agreement/Relationships.pm (-1 / +1 lines)
Lines 13-19 package Koha::ERM::Agreement::Relationships; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ERM/Agreements.pm (-1 / +1 lines)
Lines 13-19 package Koha::ERM::Agreements; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use DateTime;
19
use DateTime;
(-)a/Koha/ERM/Document.pm (-1 / +1 lines)
Lines 13-19 package Koha::ERM::Document; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ERM/Documents.pm (-1 / +1 lines)
Lines 13-19 package Koha::ERM::Documents; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ERM/EHoldings/Package.pm (-1 / +1 lines)
Lines 13-19 package Koha::ERM::EHoldings::Package; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ERM/EHoldings/Package/Agreement.pm (-1 / +1 lines)
Lines 13-19 package Koha::ERM::EHoldings::Package::Agreement; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ERM/EHoldings/Package/Agreements.pm (-1 / +1 lines)
Lines 13-19 package Koha::ERM::EHoldings::Package::Agreements; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ERM/EHoldings/Packages.pm (-1 / +1 lines)
Lines 13-19 package Koha::ERM::EHoldings::Packages; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ERM/EHoldings/Resource.pm (-1 / +1 lines)
Lines 13-19 package Koha::ERM::EHoldings::Resource; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ERM/EHoldings/Resources.pm (-1 / +1 lines)
Lines 13-19 package Koha::ERM::EHoldings::Resources; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ERM/EHoldings/Title.pm (-1 / +1 lines)
Lines 13-19 package Koha::ERM::EHoldings::Title; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ERM/EHoldings/Titles.pm (-1 / +1 lines)
Lines 13-19 package Koha::ERM::EHoldings::Titles; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ERM/EUsage/CounterFile.pm (-1 / +1 lines)
Lines 15-21 package Koha::ERM::EUsage::CounterFile; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ERM/EUsage/CounterFiles.pm (-1 / +1 lines)
Lines 15-21 package Koha::ERM::EUsage::CounterFiles; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ERM/EUsage/CounterLog.pm (-1 / +1 lines)
Lines 15-21 package Koha::ERM::EUsage::CounterLog; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ERM/EUsage/CounterLogs.pm (-1 / +1 lines)
Lines 15-21 package Koha::ERM::EUsage::CounterLogs; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ERM/EUsage/DefaultUsageReport.pm (-1 / +1 lines)
Lines 15-21 package Koha::ERM::EUsage::DefaultUsageReport; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ERM/EUsage/DefaultUsageReports.pm (-1 / +1 lines)
Lines 15-21 package Koha::ERM::EUsage::DefaultUsageReports; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ERM/EUsage/MonthlyUsage.pm (-1 / +1 lines)
Lines 15-21 package Koha::ERM::EUsage::MonthlyUsage; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ERM/EUsage/MonthlyUsages.pm (-1 / +1 lines)
Lines 15-21 package Koha::ERM::EUsage::MonthlyUsages; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ERM/EUsage/SushiCounter.pm (-1 / +1 lines)
Lines 15-21 package Koha::ERM::EUsage::SushiCounter; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ERM/EUsage/UsageDataProvider.pm (-1 / +1 lines)
Lines 15-21 package Koha::ERM::EUsage::UsageDataProvider; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ERM/EUsage/UsageDataProviders.pm (-1 / +1 lines)
Lines 15-21 package Koha::ERM::EUsage::UsageDataProviders; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ERM/EUsage/UsageDatabase.pm (-1 / +1 lines)
Lines 15-21 package Koha::ERM::EUsage::UsageDatabase; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ERM/EUsage/UsageDatabases.pm (-1 / +1 lines)
Lines 15-21 package Koha::ERM::EUsage::UsageDatabases; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ERM/EUsage/UsageItem.pm (-1 / +1 lines)
Lines 15-21 package Koha::ERM::EUsage::UsageItem; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ERM/EUsage/UsageItems.pm (-1 / +1 lines)
Lines 15-21 package Koha::ERM::EUsage::UsageItems; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ERM/EUsage/UsagePlatform.pm (-1 / +1 lines)
Lines 15-21 package Koha::ERM::EUsage::UsagePlatform; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ERM/EUsage/UsagePlatforms.pm (-1 / +1 lines)
Lines 15-21 package Koha::ERM::EUsage::UsagePlatforms; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ERM/EUsage/UsageTitle.pm (-1 / +1 lines)
Lines 15-21 package Koha::ERM::EUsage::UsageTitle; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ERM/EUsage/UsageTitles.pm (-1 / +1 lines)
Lines 15-21 package Koha::ERM::EUsage::UsageTitles; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ERM/EUsage/YearlyUsage.pm (-1 / +1 lines)
Lines 15-21 package Koha::ERM::EUsage::YearlyUsage; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ERM/EUsage/YearlyUsages.pm (-1 / +1 lines)
Lines 15-21 package Koha::ERM::EUsage::YearlyUsages; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ERM/License.pm (-1 / +1 lines)
Lines 13-19 package Koha::ERM::License; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ERM/Licenses.pm (-1 / +1 lines)
Lines 13-19 package Koha::ERM::Licenses; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ERM/UserRole.pm (-1 / +1 lines)
Lines 13-19 package Koha::ERM::UserRole; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ERM/UserRoles.pm (-1 / +1 lines)
Lines 13-19 package Koha::ERM::UserRoles; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Edifact.pm (-1 / +1 lines)
Lines 15-21 package Koha::Edifact; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/Koha/Edifact/File.pm (-1 / +1 lines)
Lines 13-19 package Koha::Edifact::File; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Edifact/File/Error.pm (-1 / +1 lines)
Lines 13-19 package Koha::Edifact::File::Error; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Edifact/File/Errors.pm (-1 / +1 lines)
Lines 13-19 package Koha::Edifact::File::Errors; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Edifact/Files.pm (-1 / +1 lines)
Lines 13-19 package Koha::Edifact::Files; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Edifact/Line.pm (-1 / +1 lines)
Lines 15-21 package Koha::Edifact::Line; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/Koha/Edifact/Message.pm (-1 / +1 lines)
Lines 15-21 package Koha::Edifact::Message; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/Koha/Edifact/Order.pm (-1 / +1 lines)
Lines 19-25 use utf8; Link Here
19
# GNU General Public License for more details.
19
# GNU General Public License for more details.
20
#
20
#
21
# You should have received a copy of the GNU General Public License
21
# You should have received a copy of the GNU General Public License
22
# along with Koha; if not, see <http://www.gnu.org/licenses>.
22
# along with Koha; if not, see <https://www.gnu.org/licenses>.
23
23
24
use Carp qw( carp );
24
use Carp qw( carp );
25
use DateTime;
25
use DateTime;
(-)a/Koha/Edifact/Segment.pm (-1 / +1 lines)
Lines 15-21 package Koha::Edifact::Segment; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/Koha/Edifact/Transport.pm (-1 / +1 lines)
Lines 15-21 package Koha::Edifact::Transport; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Email.pm (-1 / +1 lines)
Lines 16-22 package Koha::Email; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/Koha/Encryption.pm (-1 / +1 lines)
Lines 15-21 package Koha::Encryption; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Exception.pm (-1 / +1 lines)
Lines 15-21 package Koha::Exception; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Exceptions/Account.pm (-1 / +1 lines)
Lines 13-19 package Koha::Exceptions::Account; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Exceptions/Acquisition/Basket.pm (-1 / +1 lines)
Lines 13-19 package Koha::Exceptions::Acquisition::Basket; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Exceptions/ArticleRequest.pm (-1 / +1 lines)
Lines 13-19 package Koha::Exceptions::ArticleRequest; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Exceptions/Auth.pm (-1 / +1 lines)
Lines 13-19 package Koha::Exceptions::Auth; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Exceptions/BackgroundJob.pm (-1 / +1 lines)
Lines 13-19 package Koha::Exceptions::BackgroundJob; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Exceptions/Checkin.pm (-1 / +1 lines)
Lines 13-19 package Koha::Exceptions::Checkin; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Exceptions/Checkouts/ReturnClaims.pm (-1 / +1 lines)
Lines 13-19 package Koha::Exceptions::Checkouts::ReturnClaims; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Exceptions/CirculationRule.pm (-1 / +1 lines)
Lines 13-19 package Koha::Exceptions::CirculationRule; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Exceptions/CurbsidePickup.pm (-1 / +1 lines)
Lines 13-19 package Koha::Exceptions::CurbsidePickup; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Exceptions/ERM/EUsage/CounterFile.pm (-1 / +1 lines)
Lines 13-19 package Koha::Exceptions::ERM::EUsage::CounterFile; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Exceptions/Elasticsearch.pm (-1 / +1 lines)
Lines 13-19 package Koha::Exceptions::Elasticsearch; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Exceptions/Hold.pm (-1 / +1 lines)
Lines 13-19 package Koha::Exceptions::Hold; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Exceptions/Ill.pm (-1 / +1 lines)
Lines 13-19 package Koha::Exceptions::Ill; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Exceptions/Item/Bundle.pm (-1 / +1 lines)
Lines 13-19 package Koha::Exceptions::Item::Bundle; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Exceptions/Item/Transfer.pm (-1 / +1 lines)
Lines 13-19 package Koha::Exceptions::Item::Transfer; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Exceptions/Metadata.pm (-1 / +1 lines)
Lines 13-19 package Koha::Exceptions::Metadata; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Exceptions/Object.pm (-1 / +1 lines)
Lines 13-19 package Koha::Exceptions::Object; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Exceptions/Password.pm (-1 / +1 lines)
Lines 13-19 package Koha::Exceptions::Password; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Exceptions/Patron/Category.pm (-1 / +1 lines)
Lines 13-19 package Koha::Exceptions::Patron::Category; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Exceptions/Patron/MessagePreference.pm (-1 / +1 lines)
Lines 13-19 package Koha::Exceptions::Patron::MessagePreference; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Exceptions/Patron/MessagePreference/Transport.pm (-1 / +1 lines)
Lines 13-19 package Koha::Exceptions::Patron::MessagePreference::Transport; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Exceptions/Patron/Relationship.pm (-1 / +1 lines)
Lines 13-19 package Koha::Exceptions::Patron::Relationship; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Exceptions/Plugin.pm (-1 / +1 lines)
Lines 13-19 package Koha::Exceptions::Plugin; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Exceptions/Preservation.pm (-1 / +1 lines)
Lines 13-19 package Koha::Exceptions::Preservation; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Exceptions/Suggestion.pm (-1 / +1 lines)
Lines 13-19 package Koha::Exceptions::Suggestion; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Exceptions/SysPref.pm (-1 / +1 lines)
Lines 13-19 package Koha::Exceptions::SysPref; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Exceptions/Token.pm (-1 / +1 lines)
Lines 13-19 package Koha::Exceptions::Token; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Exceptions/TransferLimit.pm (-1 / +1 lines)
Lines 13-19 package Koha::Exceptions::TransferLimit; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Exceptions/Virtualshelf.pm (-1 / +1 lines)
Lines 13-19 package Koha::Exceptions::Virtualshelf; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Exceptions/XSLT.pm (-1 / +1 lines)
Lines 15-21 package Koha::Exceptions::XSLT; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use Koha::Exception;
21
use Koha::Exception;
(-)a/Koha/Exporter/Record.pm (-1 / +1 lines)
Lines 295-298 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the Link Here
295
GNU General Public License for more details.
295
GNU General Public License for more details.
296
296
297
You should have received a copy of the GNU General Public License
297
You should have received a copy of the GNU General Public License
298
along with Koha; if not, see <http://www.gnu.org/licenses>.
298
along with Koha; if not, see <https://www.gnu.org/licenses>.
(-)a/Koha/ExternalContent.pm (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
package Koha::ExternalContent;
18
package Koha::ExternalContent;
19
19
(-)a/Koha/ExternalContent/OverDrive.pm (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
package Koha::ExternalContent::OverDrive;
18
package Koha::ExternalContent::OverDrive;
19
19
(-)a/Koha/Filter/MARC/EmbedItems.pm (-1 / +1 lines)
Lines 15-21 package Koha::Filter::MARC::EmbedItems; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/Filter/MARC/EmbedItemsAvailability.pm (-1 / +1 lines)
Lines 13-19 package Koha::Filter::MARC::EmbedItemsAvailability; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
=head1 NAME
18
=head1 NAME
19
19
(-)a/Koha/Filter/MARC/EmbedSeeFromHeadings.pm (-1 / +1 lines)
Lines 15-21 package Koha::Filter::MARC::EmbedSeeFromHeadings; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/Filter/MARC/ExpandCodedFields.pm (-1 / +1 lines)
Lines 15-21 package Koha::Filter::MARC::ExpandCodedFields; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/Filter/MARC/Null.pm (-1 / +1 lines)
Lines 15-21 package Koha::Filter::MARC::Null; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/Filter/MARC/TrimFields.pm (-1 / +1 lines)
Lines 15-21 package Koha::Filter::MARC::TrimFields; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/Filter/MARC/ViewPolicy.pm (-3 / +3 lines)
Lines 15-21 package Koha::Filter::MARC::ViewPolicy; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
Lines 284-290 These should all be installed if the koha-common package is installed or Koha is Link Here
284
=head1 BUGS AND LIMITATIONS
284
=head1 BUGS AND LIMITATIONS
285
285
286
This is the initial version. Please feel free to report bugs
286
This is the initial version. Please feel free to report bugs
287
at http://bugs.koha-community.org/.
287
at https://bugs.koha-community.org/.
288
288
289
=head1 AUTHOR
289
=head1 AUTHOR
290
290
Lines 307-313 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the Link Here
307
GNU General Public License for more details.
307
GNU General Public License for more details.
308
308
309
You should have received a copy of the GNU General Public License
309
You should have received a copy of the GNU General Public License
310
along with Koha; if not, see <http://www.gnu.org/licenses>.
310
along with Koha; if not, see <https://www.gnu.org/licenses>.
311
311
312
=cut
312
=cut
313
313
(-)a/Koha/FrameworkPlugin.pm (-1 / +1 lines)
Lines 16-22 package Koha::FrameworkPlugin; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
=head1 NAME
21
=head1 NAME
22
22
(-)a/Koha/Hold.pm (-1 / +1 lines)
Lines 16-22 package Koha::Hold; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/Koha/Hold/CancellationRequest.pm (-1 / +1 lines)
Lines 13-19 package Koha::Hold::CancellationRequest; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Hold/CancellationRequests.pm (-1 / +1 lines)
Lines 13-19 package Koha::Hold::CancellationRequests; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Hold/HoldsQueueItem.pm (-1 / +1 lines)
Lines 15-21 package Koha::Hold::HoldsQueueItem; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Hold/HoldsQueueItems.pm (-1 / +1 lines)
Lines 15-21 package Koha::Hold::HoldsQueueItems; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Holds.pm (-1 / +1 lines)
Lines 15-21 package Koha::Holds; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/I18N.pm (-1 / +1 lines)
Lines 15-21 package Koha::I18N; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ILL/Backend.pm (-1 / +1 lines)
Lines 15-21 package Koha::ILL::Backend; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ILL/Backend/Standard.pm (-1 / +1 lines)
Lines 15-21 package Koha::ILL::Backend::Standard; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use DateTime;
21
use DateTime;
(-)a/Koha/ILL/Batch.pm (-1 / +1 lines)
Lines 15-21 package Koha::ILL::Batch; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ILL/Batch/Status.pm (-1 / +1 lines)
Lines 15-21 package Koha::ILL::Batch::Status; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use Koha::Database;
21
use Koha::Database;
(-)a/Koha/ILL/Batch/Statuses.pm (-1 / +1 lines)
Lines 15-21 package Koha::ILL::Batch::Statuses; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use Koha::Database;
21
use Koha::Database;
(-)a/Koha/ILL/Batches.pm (-1 / +1 lines)
Lines 15-21 package Koha::ILL::Batches; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use Koha::Database;
21
use Koha::Database;
(-)a/Koha/ILL/Comment.pm (-1 / +1 lines)
Lines 15-21 package Koha::ILL::Comment; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use Koha::Database;
21
use Koha::Database;
(-)a/Koha/ILL/Comments.pm (-1 / +1 lines)
Lines 15-21 package Koha::ILL::Comments; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use Koha::Database;
21
use Koha::Database;
(-)a/Koha/ILL/Request.pm (-1 / +1 lines)
Lines 15-21 package Koha::ILL::Request; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ILL/Request/Attribute.pm (-1 / +1 lines)
Lines 15-21 package Koha::ILL::Request::Attribute; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ILL/Request/Attributes.pm (-1 / +1 lines)
Lines 15-21 package Koha::ILL::Request::Attributes; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ILL/Request/Config.pm (-1 / +1 lines)
Lines 15-21 package Koha::ILL::Request::Config; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ILL/Request/Logger.pm (-1 / +1 lines)
Lines 15-21 package Koha::ILL::Request::Logger; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use JSON qw( from_json to_json );
21
use JSON qw( from_json to_json );
(-)a/Koha/ILL/Request/SupplierUpdate.pm (-1 / +1 lines)
Lines 15-21 package Koha::ILL::Request::SupplierUpdate; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ILL/Request/SupplierUpdateProcessor.pm (-1 / +1 lines)
Lines 15-21 package Koha::ILL::Request::SupplierUpdateProcessor; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ILL/Request/Workflow.pm (-1 / +1 lines)
Lines 15-21 package Koha::ILL::Request::Workflow; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ILL/Request/Workflow/Availability.pm (-1 / +1 lines)
Lines 15-21 package Koha::ILL::Request::Workflow::Availability; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ILL/Request/Workflow/ConfirmAuto.pm (-1 / +1 lines)
Lines 15-21 package Koha::ILL::Request::Workflow::ConfirmAuto; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ILL/Request/Workflow/HistoryCheck.pm (-1 / +1 lines)
Lines 15-21 package Koha::ILL::Request::Workflow::HistoryCheck; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ILL/Request/Workflow/TypeDisclaimer.pm (-1 / +1 lines)
Lines 15-21 package Koha::ILL::Request::Workflow::TypeDisclaimer; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ILL/Requests.pm (-1 / +1 lines)
Lines 15-21 package Koha::ILL::Requests; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Import/Record.pm (-1 / +1 lines)
Lines 13-19 package Koha::Import::Record; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Import/Record/Auth.pm (-1 / +1 lines)
Lines 13-19 package Koha::Import::Record::Auth; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Import/Record/Auths.pm (-1 / +1 lines)
Lines 13-19 package Koha::Import::Record::Auths; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Import/Record/Biblio.pm (-1 / +1 lines)
Lines 13-19 package Koha::Import::Record::Biblio; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Import/Record/Biblios.pm (-1 / +1 lines)
Lines 13-19 package Koha::Import::Record::Biblios; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Import/Record/Item.pm (-1 / +1 lines)
Lines 13-19 package Koha::Import::Record::Item; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Import/Record/Items.pm (-1 / +1 lines)
Lines 13-19 package Koha::Import::Record::Items; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Import/Record/Match.pm (-1 / +1 lines)
Lines 13-19 package Koha::Import::Record::Match; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Import/Record/Matches.pm (-1 / +1 lines)
Lines 13-19 package Koha::Import::Record::Matches; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Import/Records.pm (-1 / +1 lines)
Lines 13-19 package Koha::Import::Records; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ImportBatch.pm (-1 / +1 lines)
Lines 16-22 package Koha::ImportBatch; Link Here
16
#
16
#
17
# You should have received a copy of the GNU General
17
# You should have received a copy of the GNU General
18
# Public License along with Koha; if not, see
18
# Public License along with Koha; if not, see
19
# <http://www.gnu.org/licenses>
19
# <https://www.gnu.org/licenses>
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
use Try::Tiny;
22
use Try::Tiny;
(-)a/Koha/ImportBatchProfile.pm (-1 / +1 lines)
Lines 16-22 package Koha::ImportBatchProfile; Link Here
16
#
16
#
17
# You should have received a copy of the GNU General
17
# You should have received a copy of the GNU General
18
# Public License along with Koha; if not, see
18
# Public License along with Koha; if not, see
19
# <http://www.gnu.org/licenses>
19
# <https://www.gnu.org/licenses>
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/Koha/ImportBatchProfiles.pm (-1 / +1 lines)
Lines 16-22 package Koha::ImportBatchProfiles; Link Here
16
#
16
#
17
# You should have received a copy of the GNU General
17
# You should have received a copy of the GNU General
18
# Public License along with Koha; if not, see
18
# Public License along with Koha; if not, see
19
# <http://www.gnu.org/licenses>
19
# <https://www.gnu.org/licenses>
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/Koha/ImportBatches.pm (-1 / +1 lines)
Lines 16-22 package Koha::ImportBatches; Link Here
16
#
16
#
17
# You should have received a copy of the GNU General
17
# You should have received a copy of the GNU General
18
# Public License along with Koha; if not, see
18
# Public License along with Koha; if not, see
19
# <http://www.gnu.org/licenses>
19
# <https://www.gnu.org/licenses>
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/Koha/Indexer/Utils.pm (-1 / +1 lines)
Lines 14-20 package Koha::Indexer::Utils; Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use strict;
19
use strict;
20
use warnings;
20
use warnings;
(-)a/Koha/Installer/Output.pm (-1 / +1 lines)
Lines 15-21 package Koha::Installer::Output; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Item.pm (-1 / +1 lines)
Lines 15-21 package Koha::Item; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Item/Attributes.pm (-1 / +1 lines)
Lines 13-19 package Koha::Item::Attributes; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use MARC::Record;
19
use MARC::Record;
(-)a/Koha/Item/Template.pm (-1 / +1 lines)
Lines 13-19 package Koha::Item::Template; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Item/Templates.pm (-1 / +1 lines)
Lines 13-19 package Koha::Item::Templates; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Item/Transfer.pm (-1 / +1 lines)
Lines 13-19 package Koha::Item::Transfer; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Item/Transfer/Limit.pm (-1 / +1 lines)
Lines 14-20 package Koha::Item::Transfer::Limit; Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
20
(-)a/Koha/Item/Transfer/Limits.pm (-1 / +1 lines)
Lines 14-20 package Koha::Item::Transfer::Limits; Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
20
(-)a/Koha/Item/Transfers.pm (-1 / +1 lines)
Lines 13-19 package Koha::Item::Transfers; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ItemType.pm (-1 / +1 lines)
Lines 13-19 package Koha::ItemType; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ItemTypes.pm (-1 / +1 lines)
Lines 13-19 package Koha::ItemTypes; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Items.pm (-1 / +1 lines)
Lines 15-21 package Koha::Items; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use Array::Utils    qw( array_minus );
21
use Array::Utils    qw( array_minus );
(-)a/Koha/KeyboardShortcut.pm (-1 / +1 lines)
Lines 13-19 package Koha::KeyboardShortcut; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/KeyboardShortcuts.pm (-1 / +1 lines)
Lines 13-19 package Koha::KeyboardShortcuts; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Language.pm (-1 / +1 lines)
Lines 15-21 package Koha::Language; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/Libraries.pm (-1 / +1 lines)
Lines 15-21 package Koha::Libraries; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Library.pm (-1 / +1 lines)
Lines 15-21 package Koha::Library; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Library/Group.pm (-1 / +1 lines)
Lines 15-21 package Koha::Library::Group; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Library/Groups.pm (-1 / +1 lines)
Lines 15-21 package Koha::Library::Groups; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Library/Hour.pm (-1 / +1 lines)
Lines 14-20 package Koha::Library::Hour; Link Here
14
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
14
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
20
(-)a/Koha/Library/Hours.pm (-1 / +1 lines)
Lines 14-20 package Koha::Library::Hours; Link Here
14
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
14
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
20
(-)a/Koha/Library/OverDriveInfo.pm (-1 / +1 lines)
Lines 13-19 package Koha::Library::OverDriveInfo; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Library/OverDriveInfos.pm (-1 / +1 lines)
Lines 13-19 package Koha::Library::OverDriveInfos; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Linktracker.pm (-1 / +1 lines)
Lines 15-21 package Koha::Linktracker; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/List/Patron.pm (-1 / +1 lines)
Lines 15-21 package Koha::List::Patron; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/Localization.pm (-1 / +1 lines)
Lines 13-19 package Koha::Localization; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Localizations.pm (-1 / +1 lines)
Lines 13-19 package Koha::Localizations; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Logger.pm (-1 / +1 lines)
Lines 16-22 package Koha::Logger; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
=head1 NAME
21
=head1 NAME
22
22
(-)a/Koha/MarcOrder.pm (-1 / +1 lines)
Lines 15-21 package Koha::MarcOrder; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use Try::Tiny qw( catch try );
21
use Try::Tiny qw( catch try );
(-)a/Koha/MarcOrderAccount.pm (-1 / +1 lines)
Lines 13-19 package Koha::MarcOrderAccount; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/MarcOrderAccounts.pm (-1 / +1 lines)
Lines 13-19 package Koha::MarcOrderAccounts; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/MarcOverlayRule.pm (-1 / +1 lines)
Lines 13-19 package Koha::MarcOverlayRule; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/MarcOverlayRules.pm (-1 / +1 lines)
Lines 13-19 package Koha::MarcOverlayRules; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use List::Util qw(first any);
19
use List::Util qw(first any);
(-)a/Koha/MarcSubfieldStructure.pm (-1 / +1 lines)
Lines 13-19 package Koha::MarcSubfieldStructure; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/MarcSubfieldStructures.pm (-1 / +1 lines)
Lines 13-19 package Koha::MarcSubfieldStructures; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/MetaSearcher.pm (-1 / +1 lines)
Lines 15-21 package Koha::MetaSearcher; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/MetadataIterator.pm (-1 / +1 lines)
Lines 17-23 package Koha::MetadataIterator; Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
=head1 NAME
22
=head1 NAME
23
23
(-)a/Koha/MetadataRecord.pm (-1 / +1 lines)
Lines 15-21 package Koha::MetadataRecord; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/MetadataRecord/Authority.pm (-1 / +1 lines)
Lines 15-21 package Koha::MetadataRecord::Authority; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/Middleware/CSRF.pm (-1 / +1 lines)
Lines 13-19 package Koha::Middleware::CSRF; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Middleware/RealIP.pm (-1 / +1 lines)
Lines 15-21 package Koha::Middleware::RealIP; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Middleware/SetEnv.pm (-1 / +1 lines)
Lines 15-21 package Koha::Middleware::SetEnv; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Misc/Files.pm (-1 / +1 lines)
Lines 17-23 package Koha::Misc::Files; Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
23
(-)a/Koha/Notice/Message.pm (-1 / +1 lines)
Lines 13-19 package Koha::Notice::Message; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Notice/Messages.pm (-1 / +1 lines)
Lines 13-19 package Koha::Notice::Messages; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Notice/Template.pm (-1 / +1 lines)
Lines 13-19 package Koha::Notice::Template; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Notice/Templates.pm (-1 / +1 lines)
Lines 13-19 package Koha::Notice::Templates; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Notice/Util.pm (-1 / +1 lines)
Lines 15-21 package Koha::Notice::Util; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use Data::Dumper qw/Dumper/;
21
use Data::Dumper qw/Dumper/;
(-)a/Koha/Number/Price.pm (-1 / +1 lines)
Lines 15-21 package Koha::Number::Price; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/OAI/Client/Harvester.pm (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
package Koha::OAI::Client::Harvester;
18
package Koha::OAI::Client::Harvester;
19
19
(-)a/Koha/OAI/Server/DeletedRecord.pm (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
package Koha::OAI::Server::DeletedRecord;
19
package Koha::OAI::Server::DeletedRecord;
20
20
(-)a/Koha/OAI/Server/Description.pm (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
package Koha::OAI::Server::Description;
19
package Koha::OAI::Server::Description;
20
20
(-)a/Koha/OAI/Server/GetRecord.pm (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
package Koha::OAI::Server::GetRecord;
19
package Koha::OAI::Server::GetRecord;
20
20
(-)a/Koha/OAI/Server/Identify.pm (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
package Koha::OAI::Server::Identify;
20
package Koha::OAI::Server::Identify;
21
21
(-)a/Koha/OAI/Server/ListBase.pm (-1 / +1 lines)
Lines 15-21 package Koha::OAI::Server::ListBase; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/OAI/Server/ListIdentifiers.pm (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
package Koha::OAI::Server::ListIdentifiers;
20
package Koha::OAI::Server::ListIdentifiers;
21
21
(-)a/Koha/OAI/Server/ListMetadataFormats.pm (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
package Koha::OAI::Server::ListMetadataFormats;
20
package Koha::OAI::Server::ListMetadataFormats;
21
21
(-)a/Koha/OAI/Server/ListRecords.pm (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
package Koha::OAI::Server::ListRecords;
20
package Koha::OAI::Server::ListRecords;
21
21
(-)a/Koha/OAI/Server/ListSets.pm (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
package Koha::OAI::Server::ListSets;
19
package Koha::OAI::Server::ListSets;
20
20
(-)a/Koha/OAI/Server/Record.pm (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
package Koha::OAI::Server::Record;
19
package Koha::OAI::Server::Record;
20
20
(-)a/Koha/OAI/Server/Repository.pm (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
package Koha::OAI::Server::Repository;
20
package Koha::OAI::Server::Repository;
21
21
(-)a/Koha/OAI/Server/ResumptionToken.pm (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
package Koha::OAI::Server::ResumptionToken;
20
package Koha::OAI::Server::ResumptionToken;
21
21
(-)a/Koha/OAIServer.pm (-1 / +1 lines)
Lines 13-19 package Koha::OAIServer; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/OAIServers.pm (-1 / +1 lines)
Lines 13-19 package Koha::OAIServers; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/OAuth.pm (-1 / +1 lines)
Lines 13-19 package Koha::OAuth; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/OAuthAccessToken.pm (-1 / +1 lines)
Lines 13-19 package Koha::OAuthAccessToken; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/OAuthAccessTokens.pm (-1 / +1 lines)
Lines 13-19 package Koha::OAuthAccessTokens; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Object.pm (-1 / +1 lines)
Lines 16-22 package Koha::Object; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/Koha/Object/Limit/Library.pm (-1 / +1 lines)
Lines 13-19 package Koha::Object::Limit::Library; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Object/Message.pm (-1 / +1 lines)
Lines 13-19 package Koha::Object::Message; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Object/Mixin/AdditionalFields.pm (-2 / +2 lines)
Lines 308-314 sub strings_map { Link Here
308
308
309
=head1 AUTHOR
309
=head1 AUTHOR
310
310
311
Koha Development Team <http://koha-community.org/>
311
Koha Development Team <https://koha-community.org/>
312
312
313
=head1 COPYRIGHT AND LICENSE
313
=head1 COPYRIGHT AND LICENSE
314
314
Lines 326-332 WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR Link Here
326
A PARTICULAR PURPOSE. See the GNU General Public License for more details.
326
A PARTICULAR PURPOSE. See the GNU General Public License for more details.
327
327
328
You should have received a copy of the GNU General Public License along
328
You should have received a copy of the GNU General Public License along
329
with Koha; if not, see <http://www.gnu.org/licenses>.
329
with Koha; if not, see <https://www.gnu.org/licenses>.
330
330
331
=cut
331
=cut
332
332
(-)a/Koha/Objects.pm (-1 / +1 lines)
Lines 15-21 package Koha::Objects; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Objects/Limit/Library.pm (-1 / +1 lines)
Lines 13-19 package Koha::Objects::Limit::Library; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Objects/Mixin/AdditionalFields.pm (-2 / +2 lines)
Lines 88-94 sub extended_attributes_tablename_query { Link Here
88
88
89
=head1 AUTHOR
89
=head1 AUTHOR
90
90
91
Koha Development Team <http://koha-community.org/>
91
Koha Development Team <https://koha-community.org/>
92
92
93
=head1 COPYRIGHT AND LICENSE
93
=head1 COPYRIGHT AND LICENSE
94
94
Lines 106-112 WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR Link Here
106
A PARTICULAR PURPOSE. See the GNU General Public License for more details.
106
A PARTICULAR PURPOSE. See the GNU General Public License for more details.
107
107
108
You should have received a copy of the GNU General Public License along
108
You should have received a copy of the GNU General Public License along
109
with Koha; if not, see <http://www.gnu.org/licenses>.
109
with Koha; if not, see <https://www.gnu.org/licenses>.
110
110
111
=cut
111
=cut
112
112
(-)a/Koha/Objects/Mixin/ExtendedAttributes.pm (-1 / +1 lines)
Lines 15-21 package Koha::Objects::Mixin::ExtendedAttributes; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use Scalar::Util qw( reftype );
21
use Scalar::Util qw( reftype );
(-)a/Koha/Objects/Record/Collections.pm (-1 / +1 lines)
Lines 15-21 package Koha::Objects::Record::Collections; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Old/Biblio.pm (-1 / +1 lines)
Lines 13-19 package Koha::Old::Biblio; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Old/Biblio/Metadata.pm (-1 / +1 lines)
Lines 13-19 package Koha::Old::Biblio::Metadata; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Old/Biblio/Metadatas.pm (-1 / +1 lines)
Lines 13-19 package Koha::Old::Biblio::Metadatas; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Old/Biblioitem.pm (-1 / +1 lines)
Lines 13-19 package Koha::Old::Biblioitem; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Old/Biblioitems.pm (-1 / +1 lines)
Lines 13-19 package Koha::Old::Biblioitems; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Old/Biblios.pm (-1 / +1 lines)
Lines 13-19 package Koha::Old::Biblios; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Old/Checkout.pm (-1 / +1 lines)
Lines 13-19 package Koha::Old::Checkout; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Old/Checkouts.pm (-1 / +1 lines)
Lines 13-19 package Koha::Old::Checkouts; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Old/Hold.pm (-1 / +1 lines)
Lines 15-21 package Koha::Old::Hold; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Old/Holds.pm (-1 / +1 lines)
Lines 15-21 package Koha::Old::Holds; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Old/Item.pm (-1 / +1 lines)
Lines 13-19 package Koha::Old::Item; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Old/Items.pm (-1 / +1 lines)
Lines 13-19 package Koha::Old::Items; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Old/Patron.pm (-1 / +1 lines)
Lines 13-19 package Koha::Old::Patron; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Old/Patrons.pm (-1 / +1 lines)
Lines 13-19 package Koha::Old::Patrons; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/OverdueRule.pm (-1 / +1 lines)
Lines 15-21 package Koha::OverdueRule; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/OverdueRules.pm (-1 / +1 lines)
Lines 15-21 package Koha::OverdueRules; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Patron.pm (-1 / +1 lines)
Lines 16-22 package Koha::Patron; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/Koha/Patron/Attribute.pm (-1 / +1 lines)
Lines 13-19 package Koha::Patron::Attribute; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Patron/Attribute/Type.pm (-1 / +1 lines)
Lines 13-19 package Koha::Patron::Attribute::Type; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Patron/Attribute/Types.pm (-1 / +1 lines)
Lines 13-19 package Koha::Patron::Attribute::Types; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Patron/Attributes.pm (-1 / +1 lines)
Lines 13-19 package Koha::Patron::Attributes; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Patron/Categories.pm (-1 / +1 lines)
Lines 13-19 package Koha::Patron::Categories; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Patron/Category.pm (-1 / +1 lines)
Lines 13-19 package Koha::Patron::Category; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Patron/Consent.pm (-1 / +1 lines)
Lines 15-21 package Koha::Patron::Consent; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Patron/Consents.pm (-1 / +1 lines)
Lines 15-21 package Koha::Patron::Consents; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Patron/Debarments.pm (-1 / +1 lines)
Lines 15-21 package Koha::Patron::Debarments; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Patron/Files.pm (-1 / +1 lines)
Lines 15-21 package Koha::Patron::Files; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Patron/HouseboundProfile.pm (-1 / +1 lines)
Lines 13-19 package Koha::Patron::HouseboundProfile; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Patron/HouseboundProfiles.pm (-1 / +1 lines)
Lines 13-19 package Koha::Patron::HouseboundProfiles; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Patron/HouseboundRole.pm (-1 / +1 lines)
Lines 13-19 package Koha::Patron::HouseboundRole; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Patron/HouseboundRoles.pm (-1 / +1 lines)
Lines 13-19 package Koha::Patron::HouseboundRoles; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Patron/HouseboundVisit.pm (-1 / +1 lines)
Lines 13-19 package Koha::Patron::HouseboundVisit; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Patron/HouseboundVisits.pm (-1 / +1 lines)
Lines 13-19 package Koha::Patron::HouseboundVisits; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Patron/Image.pm (-1 / +1 lines)
Lines 13-19 package Koha::Patron::Image; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Patron/Images.pm (-1 / +1 lines)
Lines 13-19 package Koha::Patron::Images; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Patron/Message.pm (-1 / +1 lines)
Lines 13-19 package Koha::Patron::Message; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Patron/MessagePreference.pm (-1 / +1 lines)
Lines 15-21 package Koha::Patron::MessagePreference; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Patron/MessagePreference/Attribute.pm (-1 / +1 lines)
Lines 15-21 package Koha::Patron::MessagePreference::Attribute; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Patron/MessagePreference/Attributes.pm (-1 / +1 lines)
Lines 15-21 package Koha::Patron::MessagePreference::Attributes; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Patron/MessagePreference/Transport.pm (-1 / +1 lines)
Lines 15-21 package Koha::Patron::MessagePreference::Transport; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Patron/MessagePreference/Transport/Preference.pm (-1 / +1 lines)
Lines 15-21 package Koha::Patron::MessagePreference::Transport::Preference; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Patron/MessagePreference/Transport/Preferences.pm (-1 / +1 lines)
Lines 15-21 package Koha::Patron::MessagePreference::Transport::Preferences; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Patron/MessagePreference/Transport/Type.pm (-1 / +1 lines)
Lines 15-21 package Koha::Patron::MessagePreference::Transport::Type; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Patron/MessagePreference/Transport/Types.pm (-1 / +1 lines)
Lines 15-21 package Koha::Patron::MessagePreference::Transport::Types; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Patron/MessagePreference/Transports.pm (-1 / +1 lines)
Lines 15-21 package Koha::Patron::MessagePreference::Transports; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Patron/MessagePreferences.pm (-1 / +1 lines)
Lines 15-21 package Koha::Patron::MessagePreferences; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Patron/Messages.pm (-1 / +1 lines)
Lines 13-19 package Koha::Patron::Messages; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Patron/Modification.pm (-1 / +1 lines)
Lines 15-21 package Koha::Patron::Modification; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Patron/Modifications.pm (-1 / +1 lines)
Lines 14-20 package Koha::Patron::Modifications; Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
=head1 NAME
19
=head1 NAME
20
20
(-)a/Koha/Patron/Password/Recovery.pm (-1 / +1 lines)
Lines 15-21 package Koha::Patron::Password::Recovery; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use C4::Context;
21
use C4::Context;
(-)a/Koha/Patron/Relationship.pm (-1 / +1 lines)
Lines 13-19 package Koha::Patron::Relationship; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Patron/Relationships.pm (-1 / +1 lines)
Lines 13-19 package Koha::Patron::Relationships; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Patron/Restriction.pm (-1 / +1 lines)
Lines 13-19 package Koha::Patron::Restriction; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Patron/Restriction/Type.pm (-1 / +1 lines)
Lines 13-19 package Koha::Patron::Restriction::Type; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Patron/Restriction/Types.pm (-1 / +1 lines)
Lines 13-19 package Koha::Patron::Restriction::Types; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Patron/Restrictions.pm (-1 / +1 lines)
Lines 13-19 package Koha::Patron::Restrictions; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Patrons.pm (-1 / +1 lines)
Lines 16-22 package Koha::Patrons; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/Koha/Patrons/Import.pm (-1 / +1 lines)
Lines 13-19 package Koha::Patrons::Import; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use Moo;
19
use Moo;
(-)a/Koha/Plugins.pm (-1 / +1 lines)
Lines 15-21 package Koha::Plugins; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Plugins/Base.pm (-1 / +1 lines)
Lines 15-21 package Koha::Plugins::Base; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Plugins/Data.pm (-1 / +1 lines)
Lines 15-21 package Koha::Plugins::Data; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Plugins/Datas.pm (-1 / +1 lines)
Lines 15-21 package Koha::Plugins::Datas; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Plugins/Handler.pm (-1 / +1 lines)
Lines 15-21 package Koha::Plugins::Handler; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Plugins/Method.pm (-1 / +1 lines)
Lines 13-19 package Koha::Plugins::Method; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Plugins/Methods.pm (-1 / +1 lines)
Lines 13-19 package Koha::Plugins::Methods; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Plugins/Tab.pm (-1 / +1 lines)
Lines 13-19 package Koha::Plugins::Tab; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Policy/Holds.pm (-1 / +1 lines)
Lines 15-21 package Koha::Policy::Holds; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Policy/Patrons/Cardnumber.pm (-1 / +1 lines)
Lines 15-21 package Koha::Policy::Patrons::Cardnumber; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Preservation/Processing.pm (-1 / +1 lines)
Lines 13-19 package Koha::Preservation::Processing; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Preservation/Processing/Attribute.pm (-1 / +1 lines)
Lines 13-19 package Koha::Preservation::Processing::Attribute; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Preservation/Processing/Attributes.pm (-1 / +1 lines)
Lines 13-19 package Koha::Preservation::Processing::Attributes; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Preservation/Processings.pm (-1 / +1 lines)
Lines 13-19 package Koha::Preservation::Processings; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Preservation/Train.pm (-1 / +1 lines)
Lines 13-19 package Koha::Preservation::Train; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Preservation/Train/Item.pm (-1 / +1 lines)
Lines 13-19 package Koha::Preservation::Train::Item; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Preservation/Train/Item/Attribute.pm (-1 / +1 lines)
Lines 13-19 package Koha::Preservation::Train::Item::Attribute; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Preservation/Train/Item/Attributes.pm (-1 / +1 lines)
Lines 13-19 package Koha::Preservation::Train::Item::Attributes; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Preservation/Train/Items.pm (-1 / +1 lines)
Lines 13-19 package Koha::Preservation::Train::Items; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Preservation/Trains.pm (-1 / +1 lines)
Lines 13-19 package Koha::Preservation::Trains; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/ProblemReport.pm (-1 / +1 lines)
Lines 15-21 package Koha::ProblemReport; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/ProblemReports.pm (-1 / +1 lines)
Lines 15-21 package Koha::ProblemReports; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/PseudonymizedTransaction.pm (-1 / +1 lines)
Lines 12-18 package Koha::PseudonymizedTransaction; Link Here
12
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
12
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
13
#
13
#
14
# You should have received a copy of the GNU General Public License
14
# You should have received a copy of the GNU General Public License
15
# along with Koha; if not, see <http://www.gnu.org/licenses>.
15
# along with Koha; if not, see <https://www.gnu.org/licenses>.
16
16
17
use Modern::Perl;
17
use Modern::Perl;
18
18
(-)a/Koha/PseudonymizedTransactions.pm (-1 / +1 lines)
Lines 12-18 package Koha::PseudonymizedTransactions; Link Here
12
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
12
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
13
#
13
#
14
# You should have received a copy of the GNU General Public License
14
# You should have received a copy of the GNU General Public License
15
# along with Koha; if not, see <http://www.gnu.org/licenses>.
15
# along with Koha; if not, see <https://www.gnu.org/licenses>.
16
16
17
use Modern::Perl;
17
use Modern::Perl;
18
18
(-)a/Koha/Quote.pm (-1 / +1 lines)
Lines 13-19 package Koha::Quote; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Quotes.pm (-1 / +1 lines)
Lines 13-19 package Koha::Quotes; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/Plugin/Auth/IdP.pm (-1 / +1 lines)
Lines 15-21 package Koha::REST::Plugin::Auth::IdP; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/REST/Plugin/Auth/PublicRoutes.pm (-1 / +1 lines)
Lines 15-21 package Koha::REST::Plugin::Auth::PublicRoutes; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/REST/Plugin/Exceptions.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::Plugin::Exceptions; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/Plugin/Objects.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::Plugin::Objects; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/Plugin/Pagination.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::Plugin::Pagination; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/Plugin/PluginRoutes.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::Plugin::PluginRoutes; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/Plugin/Query.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::Plugin::Query; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/Plugin/Responses.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::Plugin::Responses; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Acquisitions/Baskets.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Acquisitions::Baskets; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Acquisitions/Funds.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Acquisitions::Funds; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Acquisitions/Orders.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Acquisitions::Orders; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Acquisitions/Vendor/Edifact/Files.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Acquisitions::Vendor::Edifact::Files; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Acquisitions/Vendor/Issues.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Acquisitions::Vendor::Issues; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Acquisitions/Vendors.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Acquisitions::Vendors; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/AdvancedEditorMacro.pm (-1 / +1 lines)
Lines 12-18 package Koha::REST::V1::AdvancedEditorMacro; Link Here
12
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
12
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
13
#
13
#
14
# You should have received a copy of the GNU General Public License
14
# You should have received a copy of the GNU General Public License
15
# along with Koha; if not, see <http://www.gnu.org/licenses>.
15
# along with Koha; if not, see <https://www.gnu.org/licenses>.
16
16
17
use Modern::Perl;
17
use Modern::Perl;
18
18
(-)a/Koha/REST/V1/ArticleRequests.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::ArticleRequests; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Auth.pm (-1 / +1 lines)
Lines 15-21 package Koha::REST::V1::Auth; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/REST/V1/Auth/Identity/Provider/Domains.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Auth::Identity::Provider::Domains; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Auth/Identity/Providers.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Auth::Identity::Providers; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Auth/Password.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Auth::Password; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/AuthorisedValueCategories.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::AuthorisedValueCategories; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/AuthorisedValues.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::AuthorisedValues; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Authorities.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Authorities; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/BackgroundJobs.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::BackgroundJobs; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Biblios.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Biblios; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Biblios/ItemGroups.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Biblios::ItemGroups; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Biblios/ItemGroups/Items.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Biblios::ItemGroups::Items; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Bookings.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Bookings; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/CashRegisters/Cashups.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::CashRegisters::Cashups; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Checkouts.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Checkouts; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Cities.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Cities; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Clubs/Holds.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Clubs::Holds; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Config/SMTP/Servers.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Config::SMTP::Servers; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/DeletedBiblios.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::DeletedBiblios; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/ERM.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::ERM; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/ERM/Agreements.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::ERM::Agreements; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/ERM/Documents.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::ERM::Documents; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/ERM/EHoldings/Packages.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::ERM::EHoldings::Packages; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/ERM/EHoldings/Packages/EBSCO.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::ERM::EHoldings::Packages::EBSCO; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/ERM/EHoldings/Packages/Local.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::ERM::EHoldings::Packages::Local; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/ERM/EHoldings/Resources.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::ERM::EHoldings::Resources; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/ERM/EHoldings/Resources/EBSCO.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::ERM::EHoldings::Resources::EBSCO; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/ERM/EHoldings/Resources/Local.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::ERM::EHoldings::Resources::Local; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/ERM/EHoldings/Titles.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::ERM::EHoldings::Titles; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/ERM/EHoldings/Titles/EBSCO.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::ERM::EHoldings::Titles::EBSCO; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/ERM/EHoldings/Titles/Local.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::ERM::EHoldings::Titles::Local; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/ERM/EUsage/CounterFiles.pm (-1 / +1 lines)
Lines 15-21 package Koha::REST::V1::ERM::EUsage::CounterFiles; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/REST/V1/ERM/EUsage/CounterLogs.pm (-1 / +1 lines)
Lines 15-21 package Koha::REST::V1::ERM::EUsage::CounterLogs; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/REST/V1/ERM/EUsage/CounterRegistry.pm (-1 / +1 lines)
Lines 15-21 package Koha::REST::V1::ERM::EUsage::CounterRegistry; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/REST/V1/ERM/EUsage/CustomReports.pm (-1 / +1 lines)
Lines 15-21 package Koha::REST::V1::ERM::EUsage::CustomReports; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/REST/V1/ERM/EUsage/DefaultUsageReports.pm (-1 / +1 lines)
Lines 15-21 package Koha::REST::V1::ERM::EUsage::DefaultUsageReports; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/REST/V1/ERM/EUsage/SushiServices.pm (-1 / +1 lines)
Lines 15-21 package Koha::REST::V1::ERM::EUsage::SushiServices; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/REST/V1/ERM/EUsage/UsageDataProviders.pm (-1 / +1 lines)
Lines 15-21 package Koha::REST::V1::ERM::EUsage::UsageDataProviders; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/REST/V1/ERM/EUsage/UsageDatabases.pm (-1 / +1 lines)
Lines 15-21 package Koha::REST::V1::ERM::EUsage::UsageDatabases; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/REST/V1/ERM/EUsage/UsageItems.pm (-1 / +1 lines)
Lines 15-21 package Koha::REST::V1::ERM::EUsage::UsageItems; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/REST/V1/ERM/EUsage/UsagePlatforms.pm (-1 / +1 lines)
Lines 15-21 package Koha::REST::V1::ERM::EUsage::UsagePlatforms; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/REST/V1/ERM/EUsage/UsageTitles.pm (-1 / +1 lines)
Lines 15-21 package Koha::REST::V1::ERM::EUsage::UsageTitles; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/REST/V1/ERM/Licenses.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::ERM::Licenses; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/ExtendedAttributeTypes.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::ExtendedAttributeTypes; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
# IMPORTANT NOTE
18
# IMPORTANT NOTE
19
#
19
#
(-)a/Koha/REST/V1/Holds.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Holds; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/ILL/Backends.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::ILL::Backends; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/ILL/Batch/Statuses.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::ILL::Batch::Statuses; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/ILL/Batches.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::ILL::Batches; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/ILL/Requests.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::ILL::Requests; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/ImportBatchProfiles.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::ImportBatchProfiles; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/ImportRecordMatches.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::ImportRecordMatches; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/ItemTypes.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::ItemTypes; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Items.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Items; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Libraries.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Libraries; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Lists.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Lists; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/OAuth.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::OAuth; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/OAuth/Client.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::OAuth::Client; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Patrons.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Patrons; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Patrons/Account.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Patrons::Account; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Patrons/Attributes.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Patrons::Attributes; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Patrons/Categories.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Patrons::Categories; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Patrons/Checkouts.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Patrons::Checkouts; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Patrons/Holds.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Patrons::Holds; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Patrons/Password.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Patrons::Password; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Patrons/Password/Expiration.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Patrons::Password::Expiration; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Patrons/Recalls.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Patrons::Recalls; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Preservation.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Preservation; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Preservation/Processings.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Preservation::Processings; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Preservation/Trains.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Preservation::Trains; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Preservation/WaitingList.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Preservation::WaitingList; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Quotes.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Quotes; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/RecordSources.pm (-1 / +1 lines)
Lines 15-21 package Koha::REST::V1::RecordSources; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/REST/V1/ReturnClaims.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::ReturnClaims; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/SearchFilter.pm (-1 / +1 lines)
Lines 12-18 package Koha::REST::V1::SearchFilter; Link Here
12
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
12
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
13
#
13
#
14
# You should have received a copy of the GNU General Public License
14
# You should have received a copy of the GNU General Public License
15
# along with Koha; if not, see <http://www.gnu.org/licenses>.
15
# along with Koha; if not, see <https://www.gnu.org/licenses>.
16
16
17
use Modern::Perl;
17
use Modern::Perl;
18
18
(-)a/Koha/REST/V1/Static.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Static; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/StockRotation/Rotas.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::StockRotation::Rotas; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/StockRotation/Stage.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::StockRotation::Stage; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/Tickets.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::Tickets; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/TransferLimits.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::TransferLimits; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/REST/V1/TwoFactorAuth.pm (-1 / +1 lines)
Lines 13-19 package Koha::REST::V1::TwoFactorAuth; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Rating.pm (-1 / +1 lines)
Lines 13-19 package Koha::Rating; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Ratings.pm (-1 / +1 lines)
Lines 13-19 package Koha::Ratings; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Recall.pm (-1 / +1 lines)
Lines 15-21 package Koha::Recall; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Recalls.pm (-1 / +1 lines)
Lines 15-21 package Koha::Recalls; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use DateTime;
21
use DateTime;
(-)a/Koha/RecordProcessor.pm (-1 / +1 lines)
Lines 15-21 package Koha::RecordProcessor; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/RecordProcessor/Base.pm (-1 / +1 lines)
Lines 15-21 package Koha::RecordProcessor::Base; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/RecordSource.pm (-1 / +1 lines)
Lines 16-22 package Koha::RecordSource; Link Here
16
#
16
#
17
# You should have received a copy of the GNU General
17
# You should have received a copy of the GNU General
18
# Public License along with Koha; if not, see
18
# Public License along with Koha; if not, see
19
# <http://www.gnu.org/licenses>
19
# <https://www.gnu.org/licenses>
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/Koha/RecordSources.pm (-1 / +1 lines)
Lines 16-22 package Koha::RecordSources; Link Here
16
#
16
#
17
# You should have received a copy of the GNU General
17
# You should have received a copy of the GNU General
18
# Public License along with Koha; if not, see
18
# Public License along with Koha; if not, see
19
# <http://www.gnu.org/licenses>
19
# <https://www.gnu.org/licenses>
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/Koha/Report.pm (-1 / +1 lines)
Lines 13-19 package Koha::Report; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Reports.pm (-1 / +1 lines)
Lines 13-19 package Koha::Reports; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Result/Boolean.pm (-1 / +1 lines)
Lines 16-22 package Koha::Result::Boolean; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/Koha/Review.pm (-1 / +1 lines)
Lines 13-19 package Koha::Review; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Reviews.pm (-1 / +1 lines)
Lines 13-19 package Koha::Reviews; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/SMS/Provider.pm (-1 / +1 lines)
Lines 15-21 package Koha::SMS::Provider; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/SMS/Providers.pm (-1 / +1 lines)
Lines 15-21 package Koha::SMS::Providers; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/SMTP/Server.pm (-1 / +1 lines)
Lines 13-19 package Koha::SMTP::Server; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/SMTP/Servers.pm (-1 / +1 lines)
Lines 13-19 package Koha::SMTP::Servers; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Schema/Loader/mysql.pm (-1 / +1 lines)
Lines 17-23 package Koha::Schema::Loader::mysql; Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
23
(-)a/Koha/Script.pm (-1 / +1 lines)
Lines 16-22 package Koha::Script; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/Koha/SearchEngine.pm (-1 / +1 lines)
Lines 17-23 package Koha::SearchEngine; Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
use Readonly qw( Readonly );
23
use Readonly qw( Readonly );
(-)a/Koha/SearchEngine/Elasticsearch.pm (-1 / +1 lines)
Lines 15-21 package Koha::SearchEngine::Elasticsearch; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use base qw(Class::Accessor);
20
use base qw(Class::Accessor);
21
21
(-)a/Koha/SearchEngine/Elasticsearch/Browse.pm (-1 / +1 lines)
Lines 15-21 package Koha::SearchEngine::Elasticsearch::Browse; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/SearchEngine/Elasticsearch/Indexer.pm (-1 / +1 lines)
Lines 15-21 package Koha::SearchEngine::Elasticsearch::Indexer; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Carp qw( carp croak );
20
use Carp qw( carp croak );
21
use Modern::Perl;
21
use Modern::Perl;
(-)a/Koha/SearchEngine/Elasticsearch/QueryBuilder.pm (-1 / +1 lines)
Lines 15-21 package Koha::SearchEngine::Elasticsearch::QueryBuilder; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/SearchEngine/Elasticsearch/Search.pm (-1 / +1 lines)
Lines 15-21 package Koha::SearchEngine::Elasticsearch::Search; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/SearchEngine/Indexer.pm (-1 / +1 lines)
Lines 15-21 package Koha::SearchEngine::Indexer; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
# This is a shim that gives you the appropriate search object for your
20
# This is a shim that gives you the appropriate search object for your
21
# system preference.
21
# system preference.
(-)a/Koha/SearchEngine/QueryBuilder.pm (-1 / +1 lines)
Lines 15-21 package Koha::SearchEngine::QueryBuilder; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
# This is a shim that gives you the appropriate query builder for your
20
# This is a shim that gives you the appropriate query builder for your
21
# system preference.
21
# system preference.
(-)a/Koha/SearchEngine/Search.pm (-1 / +1 lines)
Lines 15-21 package Koha::SearchEngine::Search; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
# This is a shim that gives you the appropriate search object for your
20
# This is a shim that gives you the appropriate search object for your
21
# system preference.
21
# system preference.
(-)a/Koha/SearchEngine/Zebra/Indexer.pm (-1 / +1 lines)
Lines 15-21 package Koha::SearchEngine::Zebra::Indexer; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use C4::Biblio qw( ModZebra );        # FIXME This is terrible, we should move the indexation code outside of C4::Biblio
21
use C4::Biblio qw( ModZebra );        # FIXME This is terrible, we should move the indexation code outside of C4::Biblio
(-)a/Koha/SearchEngine/Zebra/QueryBuilder.pm (-1 / +1 lines)
Lines 15-21 package Koha::SearchEngine::Zebra::QueryBuilder; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/SearchEngine/Zebra/Search.pm (-1 / +1 lines)
Lines 15-21 package Koha::SearchEngine::Zebra::Search; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/SearchField.pm (-1 / +1 lines)
Lines 13-19 package Koha::SearchField; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/SearchFields.pm (-1 / +1 lines)
Lines 13-19 package Koha::SearchFields; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/SearchFilter.pm (-1 / +1 lines)
Lines 12-18 package Koha::SearchFilter; Link Here
12
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
12
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
13
#
13
#
14
# You should have received a copy of the GNU General Public License
14
# You should have received a copy of the GNU General Public License
15
# along with Koha; if not, see <http://www.gnu.org/licenses>.
15
# along with Koha; if not, see <https://www.gnu.org/licenses>.
16
16
17
use Modern::Perl;
17
use Modern::Perl;
18
use JSON qw( encode_json decode_json );
18
use JSON qw( encode_json decode_json );
(-)a/Koha/SearchFilters.pm (-1 / +1 lines)
Lines 12-18 package Koha::SearchFilters; Link Here
12
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
12
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
13
#
13
#
14
# You should have received a copy of the GNU General Public License
14
# You should have received a copy of the GNU General Public License
15
# along with Koha; if not, see <http://www.gnu.org/licenses>.
15
# along with Koha; if not, see <https://www.gnu.org/licenses>.
16
16
17
use Modern::Perl;
17
use Modern::Perl;
18
18
(-)a/Koha/SearchMarcMap.pm (-1 / +1 lines)
Lines 13-19 package Koha::SearchMarcMap; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/SearchMarcMaps.pm (-1 / +1 lines)
Lines 13-19 package Koha::SearchMarcMaps; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Serial.pm (-1 / +1 lines)
Lines 15-21 package Koha::Serial; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Serial/Item.pm (-1 / +1 lines)
Lines 15-21 package Koha::Serial::Item; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Serial/Items.pm (-1 / +1 lines)
Lines 15-21 package Koha::Serial::Items; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Serials.pm (-1 / +1 lines)
Lines 15-21 package Koha::Serials; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Session.pm (-1 / +1 lines)
Lines 13-19 package Koha::Session; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI::Session;
19
use CGI::Session;
(-)a/Koha/SharedContent.pm (-1 / +1 lines)
Lines 15-21 package Koha::SharedContent; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use JSON qw( from_json to_json );
21
use JSON qw( from_json to_json );
(-)a/Koha/SimpleMARC.pm (-1 / +1 lines)
Lines 13-19 package Koha::SimpleMARC; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Sitemapper.pm (-1 / +1 lines)
Lines 16-22 package Koha::Sitemapper; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
use Moo;
22
use Moo;
(-)a/Koha/Sitemapper/Writer.pm (-1 / +1 lines)
Lines 16-22 package Koha::Sitemapper::Writer; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Moo;
21
use Moo;
22
use Modern::Perl;
22
use Modern::Perl;
(-)a/Koha/Statistic.pm (-1 / +1 lines)
Lines 15-21 package Koha::Statistic; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Statistics.pm (-1 / +1 lines)
Lines 13-19 package Koha::Statistics; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/StockRotationItem.pm (-1 / +1 lines)
Lines 15-21 package Koha::StockRotationItem; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/StockRotationItems.pm (-1 / +1 lines)
Lines 15-21 package Koha::StockRotationItems; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/StockRotationRota.pm (-1 / +1 lines)
Lines 15-21 package Koha::StockRotationRota; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/StockRotationRotas.pm (-1 / +1 lines)
Lines 15-21 package Koha::StockRotationRotas; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/StockRotationStage.pm (-1 / +1 lines)
Lines 15-21 package Koha::StockRotationStage; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/StockRotationStages.pm (-1 / +1 lines)
Lines 15-21 package Koha::StockRotationStages; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Subscription.pm (-1 / +1 lines)
Lines 15-21 package Koha::Subscription; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Subscription/Frequencies.pm (-1 / +1 lines)
Lines 13-19 package Koha::Subscription::Frequencies; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Subscription/Frequency.pm (-1 / +1 lines)
Lines 13-19 package Koha::Subscription::Frequency; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Subscription/Histories.pm (-1 / +1 lines)
Lines 15-21 package Koha::Subscription::Histories; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Subscription/History.pm (-1 / +1 lines)
Lines 15-21 package Koha::Subscription::History; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Subscription/Numberpattern.pm (-1 / +1 lines)
Lines 15-21 package Koha::Subscription::Numberpattern; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use Koha::Database;
21
use Koha::Database;
(-)a/Koha/Subscription/Numberpatterns.pm (-1 / +1 lines)
Lines 15-21 package Koha::Subscription::Numberpatterns; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use Koha::Database;
21
use Koha::Database;
(-)a/Koha/Subscription/Routinglist.pm (-1 / +1 lines)
Lines 14-20 package Koha::Subscription::Routinglist; Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
20
(-)a/Koha/Subscription/Routinglists.pm (-1 / +1 lines)
Lines 14-20 package Koha::Subscription::Routinglists; Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
20
(-)a/Koha/Subscriptions.pm (-1 / +1 lines)
Lines 15-21 package Koha::Subscriptions; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Suggestion.pm (-1 / +1 lines)
Lines 15-21 package Koha::Suggestion; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/SuggestionEngine.pm (-1 / +1 lines)
Lines 15-21 package Koha::SuggestionEngine; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/SuggestionEngine/Base.pm (-1 / +1 lines)
Lines 15-21 package Koha::SuggestionEngine::Base; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/SuggestionEngine/Plugin/AuthorityFile.pm (-1 / +1 lines)
Lines 15-21 package Koha::SuggestionEngine::Plugin::AuthorityFile; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/SuggestionEngine/Plugin/ExplodedTerms.pm (-1 / +1 lines)
Lines 15-21 package Koha::SuggestionEngine::Plugin::ExplodedTerms; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/SuggestionEngine/Plugin/LibrisSpellcheck.pm (-1 / +1 lines)
Lines 15-21 package Koha::SuggestionEngine::Plugin::LibrisSpellcheck; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use LWP::UserAgent;
21
use LWP::UserAgent;
(-)a/Koha/SuggestionEngine/Plugin/Null.pm (-1 / +1 lines)
Lines 15-21 package Koha::SuggestionEngine::Plugin::Null; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/Suggestions.pm (-1 / +1 lines)
Lines 15-21 package Koha::Suggestions; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Tag.pm (-1 / +1 lines)
Lines 13-19 package Koha::Tag; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Tags.pm (-1 / +1 lines)
Lines 13-19 package Koha::Tags; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Tags/Approval.pm (-1 / +1 lines)
Lines 13-19 package Koha::Tags::Approval; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Tags/Approvals.pm (-1 / +1 lines)
Lines 13-19 package Koha::Tags::Approvals; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Tags/Index.pm (-1 / +1 lines)
Lines 13-19 package Koha::Tags::Index; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Tags/Indexes.pm (-1 / +1 lines)
Lines 13-19 package Koha::Tags::Indexes; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Template/Plugin/AdditionalContents.pm (-1 / +1 lines)
Lines 17-23 package Koha::Template::Plugin::AdditionalContents; Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
23
(-)a/Koha/Template/Plugin/Asset.pm (-1 / +1 lines)
Lines 15-21 package Koha::Template::Plugin::Asset; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/Template/Plugin/AudioAlerts.pm (-1 / +1 lines)
Lines 15-21 package Koha::Template::Plugin::AudioAlerts; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Template/Plugin/AuthClient.pm (-1 / +1 lines)
Lines 15-21 package Koha::Template::Plugin::AuthClient; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Template/Plugin/AuthorisedValues.pm (-1 / +1 lines)
Lines 14-20 package Koha::Template::Plugin::AuthorisedValues; Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
20
(-)a/Koha/Template/Plugin/Biblio.pm (-1 / +1 lines)
Lines 15-21 package Koha::Template::Plugin::Biblio; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Template/Plugin/Branches.pm (-1 / +1 lines)
Lines 16-22 package Koha::Template::Plugin::Branches; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/Koha/Template/Plugin/Categories.pm (-1 / +1 lines)
Lines 13-19 package Koha::Template::Plugin::Categories; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Template/Plugin/CirculationRules.pm (-1 / +1 lines)
Lines 15-21 package Koha::Template::Plugin::CirculationRules; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Template/Plugin/ClassSources.pm (-1 / +1 lines)
Lines 13-19 package Koha::Template::Plugin::ClassSources; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Template/Plugin/Context.pm (-1 / +1 lines)
Lines 13-19 package Koha::Template::Plugin::Context; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Template/Plugin/Desks.pm (-1 / +1 lines)
Lines 15-21 package Koha::Template::Plugin::Desks; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Template/Plugin/ExtendedAttributeTypes.pm (-1 / +1 lines)
Lines 15-21 package Koha::Template::Plugin::ExtendedAttributeTypes; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Template/Plugin/Frameworks.pm (-1 / +1 lines)
Lines 15-21 package Koha::Template::Plugin::Frameworks; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Template/Plugin/HtmlId.pm (-1 / +1 lines)
Lines 13-19 package Koha::Template::Plugin::HtmlId; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Template/Plugin/HtmlScrubber.pm (-1 / +1 lines)
Lines 13-19 package Koha::Template::Plugin::HtmlScrubber; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use base 'Template::Plugin::Filter';
19
use base 'Template::Plugin::Filter';
(-)a/Koha/Template/Plugin/HtmlTags.pm (-1 / +1 lines)
Lines 15-21 package Koha::Template::Plugin::HtmlTags; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Template/Plugin/I18N.pm (-1 / +1 lines)
Lines 15-21 package Koha::Template::Plugin::I18N; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Template/Plugin/ItemTypes.pm (-1 / +1 lines)
Lines 15-21 package Koha::Template::Plugin::ItemTypes; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Template/Plugin/JSConsents.pm (-1 / +1 lines)
Lines 13-19 package Koha::Template::Plugin::JSConsents; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Template/Plugin/Koha.pm (-1 / +1 lines)
Lines 15-21 package Koha::Template::Plugin::Koha; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Template/Plugin/KohaDates.pm (-1 / +1 lines)
Lines 15-21 package Koha::Template::Plugin::KohaDates; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Template/Plugin/KohaPlugins.pm (-1 / +1 lines)
Lines 15-21 package Koha::Template::Plugin::KohaPlugins; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Template/Plugin/KohaSpan.pm (-1 / +1 lines)
Lines 16-22 package Koha::Template::Plugin::KohaSpan; Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/Koha/Template/Plugin/KohaTimes.pm (-1 / +1 lines)
Lines 13-19 package Koha::Template::Plugin::KohaTimes; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use Template::Plugin::Filter;
19
use Template::Plugin::Filter;
(-)a/Koha/Template/Plugin/Languages.pm (-1 / +1 lines)
Lines 14-20 package Koha::Template::Plugin::Languages; Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
20
(-)a/Koha/Template/Plugin/NoticeTemplates.pm (-1 / +1 lines)
Lines 15-21 package Koha::Template::Plugin::NoticeTemplates; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Template/Plugin/Notices.pm (-1 / +1 lines)
Lines 15-21 package Koha::Template::Plugin::Notices; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Template/Plugin/Price.pm (-1 / +1 lines)
Lines 15-21 package Koha::Template::Plugin::Price; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Template/Plugin/Registers.pm (-1 / +1 lines)
Lines 15-21 package Koha::Template::Plugin::Registers; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/Template/Plugin/Remove_MARC_punctuation.pm (-1 / +1 lines)
Lines 13-19 package Koha::Template::Plugin::Remove_MARC_punctuation; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Template/Plugin/SafeURL.pm (-1 / +1 lines)
Lines 13-19 package Koha::Template::Plugin::SafeURL; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use URI;
19
use URI;
(-)a/Koha/Template/Plugin/TablesSettings.pm (-1 / +1 lines)
Lines 15-21 package Koha::Template::Plugin::TablesSettings; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/Template/Plugin/To.pm (-1 / +1 lines)
Lines 15-21 package Koha::Template::Plugin::To; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Template/Plugin/raw.pm (-1 / +1 lines)
Lines 13-19 package Koha::Template::Plugin::raw; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/TemplateUtils.pm (-1 / +1 lines)
Lines 15-21 package Koha::TemplateUtils; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Ticket.pm (-1 / +1 lines)
Lines 13-19 package Koha::Ticket; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Ticket/Update.pm (-1 / +1 lines)
Lines 13-19 package Koha::Ticket::Update; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Ticket/Updates.pm (-1 / +1 lines)
Lines 13-19 package Koha::Ticket::Updates; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Tickets.pm (-1 / +1 lines)
Lines 13-19 package Koha::Tickets; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Token.pm (-1 / +1 lines)
Lines 17-23 package Koha::Token; Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
=head1 NAME
22
=head1 NAME
23
23
(-)a/Koha/TrackedLink.pm (-1 / +1 lines)
Lines 13-19 package Koha::TrackedLink; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/TrackedLinks.pm (-1 / +1 lines)
Lines 13-19 package Koha::TrackedLinks; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/UI/Form/Builder/Biblio.pm (-1 / +1 lines)
Lines 13-19 package Koha::UI::Form::Builder::Biblio; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use feature qw(fc);
19
use feature qw(fc);
(-)a/Koha/UI/Form/Builder/Item.pm (-1 / +1 lines)
Lines 13-19 package Koha::UI::Form::Builder::Item; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use feature    qw(fc);
19
use feature    qw(fc);
(-)a/Koha/UI/Table/Builder/Items.pm (-1 / +1 lines)
Lines 13-19 package Koha::UI::Table::Builder::Items; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use List::MoreUtils qw( uniq );
19
use List::MoreUtils qw( uniq );
(-)a/Koha/UploadedFile.pm (-1 / +1 lines)
Lines 15-21 package Koha::UploadedFile; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use File::Spec;
21
use File::Spec;
(-)a/Koha/UploadedFiles.pm (-1 / +1 lines)
Lines 15-21 package Koha::UploadedFiles; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Uploader.pm (-1 / +1 lines)
Lines 17-23 package Koha::Uploader; Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
=head1 NAME
22
=head1 NAME
23
23
(-)a/Koha/Util/FrameworkPlugin.pm (-1 / +1 lines)
Lines 17-23 package Koha::Util::FrameworkPlugin; Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
#
21
#
22
22
23
use Modern::Perl;
23
use Modern::Perl;
(-)a/Koha/Util/MARC.pm (-1 / +1 lines)
Lines 15-21 package Koha::Util::MARC; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Util/Navigation.pm (-1 / +1 lines)
Lines 15-21 package Koha::Util::Navigation; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use C4::Context;
21
use C4::Context;
(-)a/Koha/Util/Normalize.pm (-2 / +2 lines)
Lines 15-21 package Koha::Util::Normalize; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
Lines 128-134 __END__ Link Here
128
128
129
=head1 AUTHOR
129
=head1 AUTHOR
130
130
131
Koha Development Team <http://koha-community.org/>
131
Koha Development Team <https://koha-community.org/>
132
132
133
Tomas Cohen Arazi <tomascohen@theke.io>
133
Tomas Cohen Arazi <tomascohen@theke.io>
134
134
(-)a/Koha/Util/OpenDocument.pm (-2 / +2 lines)
Lines 15-21 package Koha::Util::OpenDocument; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
Lines 86-92 __END__ Link Here
86
86
87
=head1 AUTHOR
87
=head1 AUTHOR
88
88
89
Koha Development Team <http://koha-community.org/>
89
Koha Development Team <https://koha-community.org/>
90
90
91
Fridolin Somers <fridolin.somers@biblibre.com>
91
Fridolin Somers <fridolin.somers@biblibre.com>
92
92
(-)a/Koha/Util/StockRotation.pm (-1 / +1 lines)
Lines 17-23 package Koha::Util::StockRotation; Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
23
(-)a/Koha/Virtualshelf.pm (-1 / +1 lines)
Lines 13-19 package Koha::Virtualshelf; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Virtualshelfcontent.pm (-1 / +1 lines)
Lines 13-19 package Koha::Virtualshelfcontent; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Virtualshelfcontents.pm (-1 / +1 lines)
Lines 13-19 package Koha::Virtualshelfcontents; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Virtualshelfshare.pm (-1 / +1 lines)
Lines 13-19 package Koha::Virtualshelfshare; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Virtualshelfshares.pm (-1 / +1 lines)
Lines 13-19 package Koha::Virtualshelfshares; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Virtualshelves.pm (-1 / +1 lines)
Lines 13-19 package Koha::Virtualshelves; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/XSLT/Base.pm (-1 / +1 lines)
Lines 15-21 package Koha::XSLT::Base; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/XSLT/HTTPS.pm (-1 / +1 lines)
Lines 15-21 package Koha::XSLT::HTTPS; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/XSLT/Security.pm (-1 / +1 lines)
Lines 15-21 package Koha::XSLT::Security; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/Koha/Z3950Responder.pm (-1 / +1 lines)
Lines 15-21 package Koha::Z3950Responder; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Z3950Responder/GenericSession.pm (-1 / +1 lines)
Lines 15-21 package Koha::Z3950Responder::GenericSession; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Z3950Responder/RPN.pm (-1 / +1 lines)
Lines 17-23 package Net::Z3950::RPN::Term; Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
23
(-)a/Koha/Z3950Responder/Session.pm (-1 / +1 lines)
Lines 15-21 package Koha::Z3950Responder::Session; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Z3950Responder/ZebraSession.pm (-1 / +1 lines)
Lines 15-21 package Koha::Z3950Responder::ZebraSession; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/Koha/Z3950Server.pm (-1 / +1 lines)
Lines 13-19 package Koha::Z3950Server; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/Z3950Servers.pm (-1 / +1 lines)
Lines 13-19 package Koha::Z3950Servers; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/Koha/pdfformat/layout1page.pm (-1 / +1 lines)
Lines 15-21 package Koha::pdfformat::layout1page; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
#you can use any PDF::API2 module, all you need to do is return the stringifyed pdf object from the printpdf sub.
20
#you can use any PDF::API2 module, all you need to do is return the stringifyed pdf object from the printpdf sub.
21
use vars qw(@ISA @EXPORT);
21
use vars qw(@ISA @EXPORT);
(-)a/Koha/pdfformat/layout2pages.pm (-1 / +1 lines)
Lines 18-24 package Koha::pdfformat::layout2pages; Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
#you can use any PDF::API2 module, all you need to do is return the stringifyed pdf object from the printpdf sub.
23
#you can use any PDF::API2 module, all you need to do is return the stringifyed pdf object from the printpdf sub.
24
use vars qw(@ISA @EXPORT);
24
use vars qw(@ISA @EXPORT);
(-)a/Koha/pdfformat/layout2pagesde.pm (-1 / +1 lines)
Lines 18-24 package Koha::pdfformat::layout2pagesde; Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
#you can use any PDF::API2 module, all you need to do is return the stringifyed pdf object from the printpdf sub.
23
#you can use any PDF::API2 module, all you need to do is return the stringifyed pdf object from the printpdf sub.
24
use Modern::Perl;
24
use Modern::Perl;
(-)a/Koha/pdfformat/layout3pages.pm (-1 / +1 lines)
Lines 18-24 package Koha::pdfformat::layout3pages; Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
#you can use any PDF::API2 module, all you need to do is return the stringifyed pdf object from the printpdf sub.
23
#you can use any PDF::API2 module, all you need to do is return the stringifyed pdf object from the printpdf sub.
24
use vars            qw(@ISA @EXPORT);
24
use vars            qw(@ISA @EXPORT);
(-)a/Koha/pdfformat/layout3pagesfr.pm (-1 / +1 lines)
Lines 17-23 package Koha::pdfformat::layout3pagesfr; Link Here
17
# A PARTICULAR PURPOSE. See the GNU General Public License for more details.
17
# A PARTICULAR PURPOSE. See the GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License along
19
# You should have received a copy of the GNU General Public License along
20
# with Koha; if not, see <http://www.gnu.org/licenses>.
20
# with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
#you can use any PDF::API2 module, all you need to do is return the stringifyed pdf object from the printpdf sub.
22
#you can use any PDF::API2 module, all you need to do is return the stringifyed pdf object from the printpdf sub.
23
23
(-)a/LICENSE (-4 / +4 lines)
Lines 1-7 Link Here
1
                    GNU GENERAL PUBLIC LICENSE
1
                    GNU GENERAL PUBLIC LICENSE
2
                       Version 3, 29 June 2007
2
                       Version 3, 29 June 2007
3
3
4
 Copyright (C) 2007 Free Software Foundation, Inc. <http://fsf.org/>
4
 Copyright (C) 2007 Free Software Foundation, Inc. <https://fsf.org/>
5
 Everyone is permitted to copy and distribute verbatim copies
5
 Everyone is permitted to copy and distribute verbatim copies
6
 of this license document, but changing it is not allowed.
6
 of this license document, but changing it is not allowed.
7
7
Lines 645-651 the "copyright" line and a pointer to where the full notice is found. Link Here
645
    GNU General Public License for more details.
645
    GNU General Public License for more details.
646
646
647
    You should have received a copy of the GNU General Public License
647
    You should have received a copy of the GNU General Public License
648
    along with this program.  If not, see <http://www.gnu.org/licenses/>.
648
    along with this program.  If not, see <https://www.gnu.org/licenses/>.
649
649
650
Also add information on how to contact you by electronic and paper mail.
650
Also add information on how to contact you by electronic and paper mail.
651
651
Lines 664-674 might be different; for a GUI interface, you would use an "about box". Link Here
664
  You should also get your employer (if you work as a programmer) or school,
664
  You should also get your employer (if you work as a programmer) or school,
665
if any, to sign a "copyright disclaimer" for the program, if necessary.
665
if any, to sign a "copyright disclaimer" for the program, if necessary.
666
For more information on this, and how to apply and follow the GNU GPL, see
666
For more information on this, and how to apply and follow the GNU GPL, see
667
<http://www.gnu.org/licenses/>.
667
<https://www.gnu.org/licenses/>.
668
668
669
  The GNU General Public License does not permit incorporating your program
669
  The GNU General Public License does not permit incorporating your program
670
into proprietary programs.  If your program is a subroutine library, you
670
into proprietary programs.  If your program is a subroutine library, you
671
may consider it more useful to permit linking proprietary applications with
671
may consider it more useful to permit linking proprietary applications with
672
the library.  If this is what you want to do, use the GNU Lesser General
672
the library.  If this is what you want to do, use the GNU Lesser General
673
Public License instead of this License.  But first, please read
673
Public License instead of this License.  But first, please read
674
<http://www.gnu.org/philosophy/why-not-lgpl.html>.
674
<https://www.gnu.org/philosophy/why-not-lgpl.html>.
(-)a/README.md (-2 / +2 lines)
Lines 5-17 Koha is distributed under the GNU GPL version 3 or later. Link Here
5
5
6
**Note:** Koha does not accept pull requests from git hosting sites.
6
**Note:** Koha does not accept pull requests from git hosting sites.
7
7
8
**Note:** This project has its own bug tracker, to report a bug or submit a patch visit http://bugs.koha-community.org.
8
**Note:** This project has its own bug tracker, to report a bug or submit a patch visit https://bugs.koha-community.org.
9
9
10
For guidelines on submitting patches for Koha please visit https://wiki.koha-community.org/wiki/SubmitingAPatch
10
For guidelines on submitting patches for Koha please visit https://wiki.koha-community.org/wiki/SubmitingAPatch
11
11
12
The developers handbook can be found at https://wiki.koha-community.org/wiki/Developer_handbook
12
The developers handbook can be found at https://wiki.koha-community.org/wiki/Developer_handbook
13
13
14
http://koha-community.org/
14
https://koha-community.org/
15
15
16
16
17
![Koha Logo](https://wiki.koha-community.org/w/images/KohaILS.png)
17
![Koha Logo](https://wiki.koha-community.org/w/images/KohaILS.png)
(-)a/about.pl (-1 / +1 lines)
Lines 18-24 Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
use Modern::Perl;
23
use Modern::Perl;
24
24
(-)a/acqui/acqui-home.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
=head1 NAME
19
=head1 NAME
20
20
(-)a/acqui/addorder.pl (-1 / +1 lines)
Lines 18-24 Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
=head1 NAME
23
=head1 NAME
24
24
(-)a/acqui/addorderiso2709.pl (-1 / +1 lines)
Lines 19-25 Link Here
19
# GNU General Public License for more details.
19
# GNU General Public License for more details.
20
#
20
#
21
# You should have received a copy of the GNU General Public License
21
# You should have received a copy of the GNU General Public License
22
# along with Koha; if not, see <http://www.gnu.org/licenses>.
22
# along with Koha; if not, see <https://www.gnu.org/licenses>.
23
23
24
use Modern::Perl;
24
use Modern::Perl;
25
use CGI qw ( -utf8 );
25
use CGI qw ( -utf8 );
(-)a/acqui/ajax-getauthvaluedropbox.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/acqui/basket.pl (-1 / +1 lines)
Lines 18-24 Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
use Modern::Perl;
23
use Modern::Perl;
24
use C4::Auth   qw( get_template_and_user haspermission );
24
use C4::Auth   qw( get_template_and_user haspermission );
(-)a/acqui/basketgroup.pl (-1 / +1 lines)
Lines 19-25 Link Here
19
# GNU General Public License for more details.
19
# GNU General Public License for more details.
20
#
20
#
21
# You should have received a copy of the GNU General Public License
21
# You should have received a copy of the GNU General Public License
22
# along with Koha; if not, see <http://www.gnu.org/licenses>.
22
# along with Koha; if not, see <https://www.gnu.org/licenses>.
23
23
24
=head1 NAME
24
=head1 NAME
25
25
(-)a/acqui/basketheader.pl (-1 / +1 lines)
Lines 18-24 Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
=head1 NAME
23
=head1 NAME
24
24
(-)a/acqui/booksellers.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
=head1 NAME
22
=head1 NAME
23
23
(-)a/acqui/cancelorder.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/acqui/check_budget_total.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI qw ( -utf8 );
21
use CGI qw ( -utf8 );
(-)a/acqui/check_uniqueness.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
# This script search in items table if a value for a given field exists.
20
# This script search in items table if a value for a given field exists.
21
# It is used in check_additem (additem.js)
21
# It is used in check_additem (additem.js)
(-)a/acqui/duplicate_orders.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/acqui/edifactmsgs.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
20
(-)a/acqui/edimsg.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
20
(-)a/acqui/finishreceive.pl (-1 / +1 lines)
Lines 18-24 Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
use Modern::Perl;
23
use Modern::Perl;
24
use CGI      qw ( -utf8 );
24
use CGI      qw ( -utf8 );
(-)a/acqui/histsearch.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
=head1 NAME
21
=head1 NAME
22
22
(-)a/acqui/invoice-files.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/acqui/invoice.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
=head1 NAME
19
=head1 NAME
20
20
(-)a/acqui/invoices.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
=head1 NAME
19
=head1 NAME
20
20
(-)a/acqui/lateorders-export.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI qw ( -utf8 );
19
use CGI qw ( -utf8 );
(-)a/acqui/lateorders.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
=head1 NAME
19
=head1 NAME
20
20
(-)a/acqui/moddeliverydate.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/acqui/modordernotes.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
=head1 NAME
19
=head1 NAME
20
20
(-)a/acqui/neworderempty.pl (-1 / +1 lines)
Lines 18-24 Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
=head1 NAME
23
=head1 NAME
24
24
(-)a/acqui/newordersubscription.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI             qw ( -utf8 );
21
use CGI             qw ( -utf8 );
(-)a/acqui/newordersuggestion.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
=head1 NAME
21
=head1 NAME
22
22
(-)a/acqui/ordered.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/acqui/orderreceive.pl (-1 / +1 lines)
Lines 18-24 Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
=head1 NAME
23
=head1 NAME
24
24
(-)a/acqui/parcel.pl (-1 / +1 lines)
Lines 18-24 Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
=head1 NAME
23
=head1 NAME
24
24
(-)a/acqui/parcels.pl (-1 / +1 lines)
Lines 18-24 Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
=head1 NAME
23
=head1 NAME
24
24
(-)a/acqui/showorder.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI qw ( -utf8 );
19
use CGI qw ( -utf8 );
(-)a/acqui/spent.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
=head1 NAME
22
=head1 NAME
23
23
(-)a/acqui/transferorder.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>
20
# along with Koha; if not, see <https://www.gnu.org/licenses>
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
use CGI qw ( -utf8 );
23
use CGI qw ( -utf8 );
(-)a/acqui/uncertainprice.pl (-1 / +1 lines)
Lines 19-25 Link Here
19
# GNU General Public License for more details.
19
# GNU General Public License for more details.
20
#
20
#
21
# You should have received a copy of the GNU General Public License
21
# You should have received a copy of the GNU General Public License
22
# along with Koha; if not, see <http://www.gnu.org/licenses>.
22
# along with Koha; if not, see <https://www.gnu.org/licenses>.
23
23
24
=head1 NAME
24
=head1 NAME
25
25
(-)a/acqui/vendor_issues.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI qw ( -utf8 );
21
use CGI qw ( -utf8 );
(-)a/acqui/vendors.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use C4::Auth   qw( get_template_and_user haspermission );
21
use C4::Auth   qw( get_template_and_user haspermission );
(-)a/acqui/z3950_search.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
use CGI qw/-utf8/;
23
use CGI qw/-utf8/;
(-)a/admin/additional-fields.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# A PARTICULAR PURPOSE. See the GNU General Public License for more details.
14
# A PARTICULAR PURPOSE. See the GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License along
16
# You should have received a copy of the GNU General Public License along
17
# with Koha; if not, see <http://www.gnu.org/licenses>.
17
# with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
use CGI;
20
use CGI;
(-)a/admin/admin-home.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/admin/adveditorshortcuts.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/admin/aqbudgetperiods.pl (-2 / +2 lines)
Lines 16-27 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
=head1 admin/aqbudgetperiods.pl
21
=head1 admin/aqbudgetperiods.pl
22
22
23
script to administer the budget periods table
23
script to administer the budget periods table
24
 This software is placed under the gnu General Public License, v2 (http://www.gnu.org/licenses/gpl.html)
24
 This software is placed under the gnu General Public License, v2 (https://www.gnu.org/licenses/gpl.html)
25
25
26
 ALGO :
26
 ALGO :
27
 this script use an $op to know what to do.
27
 this script use an $op to know what to do.
(-)a/admin/aqbudgets.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
23
(-)a/admin/aqcontract.pl (-1 / +1 lines)
Lines 18-24 Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
use Modern::Perl;
23
use Modern::Perl;
24
use CGI qw ( -utf8 );
24
use CGI qw ( -utf8 );
(-)a/admin/aqplan.pl (-2 / +2 lines)
Lines 14-24 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
#script to administer the aqbudgets0 table
19
#script to administer the aqbudgets0 table
20
#written 20/02/2002 by paul.poulain@free.fr
20
#written 20/02/2002 by paul.poulain@free.fr
21
# This software is placed under the gnu General Public License, v2 (http://www.gnu.org/licenses/gpl.html)
21
# This software is placed under the gnu General Public License, v2 (https://www.gnu.org/licenses/gpl.html)
22
22
23
use Modern::Perl;
23
use Modern::Perl;
24
use CGI         qw ( -utf8 );
24
use CGI         qw ( -utf8 );
(-)a/admin/audio_alerts.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/admin/auth_subfields_structure.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use C4::Output qw( output_html_with_http_headers );
21
use C4::Output qw( output_html_with_http_headers );
(-)a/admin/auth_tag_structure.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI      qw ( -utf8 );
21
use CGI      qw ( -utf8 );
(-)a/admin/authorised_values.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/admin/authtypes.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
use CGI qw ( -utf8 );
23
use CGI qw ( -utf8 );
(-)a/admin/background_jobs.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI qw ( -utf8 );
19
use CGI qw ( -utf8 );
(-)a/admin/biblio_framework.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
use CGI qw ( -utf8 );
22
use CGI qw ( -utf8 );
(-)a/admin/branch_transfer_limits.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/admin/branches.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/admin/cash_registers.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/admin/categories.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/admin/check_budget_parent.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI qw ( -utf8 );
21
use CGI qw ( -utf8 );
(-)a/admin/check_parent_total.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI qw ( -utf8 );
21
use CGI qw ( -utf8 );
(-)a/admin/checkmarc.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use C4::Output qw( output_html_with_http_headers );
21
use C4::Output qw( output_html_with_http_headers );
(-)a/admin/cities.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
use CGI qw ( -utf8 );
22
use CGI qw ( -utf8 );
(-)a/admin/classsources.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
#
20
#
21
21
22
use Modern::Perl;
22
use Modern::Perl;
(-)a/admin/clone-rules.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
# This script clones issuing rules from a library to another
20
# This script clones issuing rules from a library to another
21
# parameters :
21
# parameters :
(-)a/admin/credit_types.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI       qw ( -utf8 );
21
use CGI       qw ( -utf8 );
(-)a/admin/curbside_pickup.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI qw ( -utf8 );
19
use CGI qw ( -utf8 );
(-)a/admin/currency.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
use CGI      qw ( -utf8 );
23
use CGI      qw ( -utf8 );
(-)a/admin/debit_types.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI       qw ( -utf8 );
21
use CGI       qw ( -utf8 );
(-)a/admin/desks.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI qw ( -utf8 );
21
use CGI qw ( -utf8 );
(-)a/admin/edi_accounts.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/admin/edi_ean_accounts.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI;
21
use CGI;
(-)a/admin/identity_providers.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/admin/ill_batch_statuses.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI       qw ( -utf8 );
21
use CGI       qw ( -utf8 );
(-)a/admin/import_export_authtype.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI qw ( -utf8 );
21
use CGI qw ( -utf8 );
(-)a/admin/import_export_framework.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI qw ( -utf8 );
21
use CGI qw ( -utf8 );
(-)a/admin/item_circulation_alerts.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/admin/items_search_field.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
use CGI;
20
use CGI;
(-)a/admin/items_search_fields.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
use CGI;
20
use CGI;
(-)a/admin/itemtypes.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
=head1 admin/itemtypes.pl
21
=head1 admin/itemtypes.pl
22
22
(-)a/admin/koha2marclinks.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
use CGI qw ( -utf8 );
22
use CGI qw ( -utf8 );
(-)a/admin/library_groups.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI qw ( -utf8 );
21
use CGI qw ( -utf8 );
(-)a/admin/localization.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/admin/marc-overlay-rules.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/admin/marc_order_accounts.pl (-1 / +1 lines)
Lines 19-25 Link Here
19
# GNU General Public License for more details.
19
# GNU General Public License for more details.
20
#
20
#
21
# You should have received a copy of the GNU General Public License
21
# You should have received a copy of the GNU General Public License
22
# along with Koha; if not, see <http://www.gnu.org/licenses>.
22
# along with Koha; if not, see <https://www.gnu.org/licenses>.
23
23
24
use Modern::Perl;
24
use Modern::Perl;
25
use CGI qw ( -utf8 );
25
use CGI qw ( -utf8 );
(-)a/admin/marc_subfields_structure.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use Encode     qw( encode_utf8 );
21
use Encode     qw( encode_utf8 );
(-)a/admin/marctagstructure.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI      qw ( -utf8 );
21
use CGI      qw ( -utf8 );
(-)a/admin/matching-rules.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
#
19
#
20
20
21
use Modern::Perl;
21
use Modern::Perl;
(-)a/admin/oai_servers.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
# This script is used to maintain the OAI servers table.
18
# This script is used to maintain the OAI servers table.
19
# Parameter $op is operation: list, new, edit, add_validated, delete_confirmed.
19
# Parameter $op is operation: list, new, edit, add_validated, delete_confirmed.
(-)a/admin/oai_set_mappings.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
=head1 NAME
19
=head1 NAME
20
20
(-)a/admin/oai_sets.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
=head1 NAME
19
=head1 NAME
20
20
(-)a/admin/overdrive.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI      qw ( -utf8 );
21
use CGI      qw ( -utf8 );
(-)a/admin/patron-attr-types.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
#
20
#
21
21
22
use Modern::Perl;
22
use Modern::Perl;
(-)a/admin/preferences.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/admin/record_sources.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/admin/restrictions.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/admin/search_filters.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI;
21
use CGI;
(-)a/admin/searchengine/elasticsearch/mappings.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI;
19
use CGI;
(-)a/admin/share_content.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/admin/smart-rules.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI qw ( -utf8 );
21
use CGI qw ( -utf8 );
(-)a/admin/sms_providers.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/admin/smtp_servers.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/admin/sru_modmapping.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI;
21
use CGI;
(-)a/admin/systempreferences.pl (-2 / +2 lines)
Lines 2-8 Link Here
2
2
3
# script to administer the systempref table
3
# script to administer the systempref table
4
# written 20/02/2002 by paul.poulain@free.fr
4
# written 20/02/2002 by paul.poulain@free.fr
5
# This software is placed under the gnu General Public License, v2 (http://www.gnu.org/licenses/gpl.html)
5
# This software is placed under the gnu General Public License, v2 (https://www.gnu.org/licenses/gpl.html)
6
6
7
# Copyright 2000-2002 Katipo Communications
7
# Copyright 2000-2002 Katipo Communications
8
#
8
#
Lines 19-25 Link Here
19
# GNU General Public License for more details.
19
# GNU General Public License for more details.
20
#
20
#
21
# You should have received a copy of the GNU General Public License
21
# You should have received a copy of the GNU General Public License
22
# along with Koha; if not, see <http://www.gnu.org/licenses>.
22
# along with Koha; if not, see <https://www.gnu.org/licenses>.
23
23
24
=head1 systempreferences.pl
24
=head1 systempreferences.pl
25
25
(-)a/admin/transfer_limits.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/admin/transport-cost-matrix.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI qw ( -utf8 );
21
use CGI qw ( -utf8 );
(-)a/admin/usage_statistics.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/admin/z3950servers.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
# This script is used to maintain the Z3950 servers table.
21
# This script is used to maintain the Z3950 servers table.
22
# Parameter $op is operation: list, new, edit, add_validated, delete_confirmed.
22
# Parameter $op is operation: list, new, edit, add_validated, delete_confirmed.
(-)a/api/v1/app.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/authorities/auth_finder.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/authorities/authorities-home.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/authorities/authorities.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/authorities/blinddetail-biblio-search.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/authorities/detail-biblio-search.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/authorities/detail.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/authorities/merge.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI                 qw ( -utf8 );
21
use CGI                 qw ( -utf8 );
(-)a/authorities/ysearch.pl (-2 / +2 lines)
Lines 1-6 Link Here
1
#!/usr/bin/perl
1
#!/usr/bin/perl
2
2
3
# This software is placed under the gnu General Public License, v2 (http://www.gnu.org/licenses/gpl.html)
3
# This software is placed under the gnu General Public License, v2 (https://www.gnu.org/licenses/gpl.html)
4
4
5
# Copyright 2011 BibLibre
5
# Copyright 2011 BibLibre
6
# Parts copyright 2012 Athens County Public Libraries
6
# Parts copyright 2012 Athens County Public Libraries
Lines 18-24 Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
=head1 ysearch.pl
23
=head1 ysearch.pl
24
24
(-)a/basket/basket.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI qw ( -utf8 );
19
use CGI qw ( -utf8 );
(-)a/basket/downloadcart.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/basket/sendbasket.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/bookings/list.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/catalogue/ISBDdetail.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/catalogue/MARCdetail.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
=head1 NAME
21
=head1 NAME
22
22
(-)a/catalogue/detail.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/catalogue/getitem-ajax.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI  qw ( -utf8 );
21
use CGI  qw ( -utf8 );
(-)a/catalogue/image.pl (-1 / +1 lines)
Lines 18-24 Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
#
22
#
23
#
23
#
24
#
24
#
(-)a/catalogue/imageviewer.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/catalogue/issuehistory.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/catalogue/item-export.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/catalogue/itemsearch.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
use CGI;
20
use CGI;
(-)a/catalogue/labeledMARCdetail.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI qw ( -utf8 );
21
use CGI qw ( -utf8 );
(-)a/catalogue/moredetail.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
use C4::Koha qw( GetAuthorisedValues );
22
use C4::Koha qw( GetAuthorisedValues );
(-)a/catalogue/search-history.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
#
16
#
17
# You should have received a copy of the GNU General
17
# You should have received a copy of the GNU General
18
# Public License along with Koha; if not, see
18
# Public License along with Koha; if not, see
19
# <http://www.gnu.org/licenses>
19
# <https://www.gnu.org/licenses>
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
use CGI qw ( -utf8 );
22
use CGI qw ( -utf8 );
(-)a/catalogue/search.pl (-1 / +1 lines)
Lines 18-24 Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
=head1 NAME
23
=head1 NAME
24
24
(-)a/catalogue/showelastic.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
23
(-)a/catalogue/showmarc.pl (-1 / +1 lines)
Lines 18-24 Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
use Modern::Perl;
23
use Modern::Perl;
24
24
(-)a/catalogue/stockrotation.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 stockrotation.pl
20
=head1 stockrotation.pl
21
21
(-)a/catalogue/updateitem.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI      qw ( -utf8 );
21
use CGI      qw ( -utf8 );
22
use C4::Auth qw( checkauth );
22
use C4::Auth qw( checkauth );
(-)a/cataloguing/addbiblio.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
use CGI;
22
use CGI;
(-)a/cataloguing/addbooks.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 cataloguing:addbooks.pl
20
=head1 cataloguing:addbooks.pl
21
21
(-)a/cataloguing/additem.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
23
(-)a/cataloguing/cataloging-home.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
#
17
#
18
18
19
use Modern::Perl;
19
use Modern::Perl;
(-)a/cataloguing/concerns.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/cataloguing/editor.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
#
19
#
20
20
21
use Modern::Perl;
21
use Modern::Perl;
(-)a/cataloguing/linkitem.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
23
(-)a/cataloguing/merge.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
use CGI qw ( -utf8 );
22
use CGI qw ( -utf8 );
(-)a/cataloguing/moveitem.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
23
(-)a/cataloguing/plugin_launcher.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI      qw ( -utf8 );
21
use CGI      qw ( -utf8 );
(-)a/cataloguing/value_builder/EXAMPLE.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/barcode.pl (-1 / +1 lines)
Lines 18-24 Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
use Modern::Perl;
23
use Modern::Perl;
24
24
(-)a/cataloguing/value_builder/barcode_manual.pl (-1 / +1 lines)
Lines 18-24 Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
use Modern::Perl;
23
use Modern::Perl;
24
24
(-)a/cataloguing/value_builder/callnumber-KU.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
use CGI qw ( -utf8 );
23
use CGI qw ( -utf8 );
(-)a/cataloguing/value_builder/callnumber.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
use CGI qw ( -utf8 );
23
use CGI qw ( -utf8 );
(-)a/cataloguing/value_builder/cn_browser.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
23
(-)a/cataloguing/value_builder/dateaccessioned.pl (-1 / +1 lines)
Lines 18-24 Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
use Modern::Perl;
23
use Modern::Perl;
24
use CGI      qw ( -utf8 );
24
use CGI      qw ( -utf8 );
(-)a/cataloguing/value_builder/marc21_field_005.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
23
(-)a/cataloguing/value_builder/marc21_field_006.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
use C4::Auth qw( get_template_and_user );
23
use C4::Auth qw( get_template_and_user );
(-)a/cataloguing/value_builder/marc21_field_007.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
23
(-)a/cataloguing/value_builder/marc21_field_008.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
use C4::Auth qw( get_template_and_user );
23
use C4::Auth qw( get_template_and_user );
(-)a/cataloguing/value_builder/marc21_field_008_authorities.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
use C4::Auth qw( get_template_and_user );
23
use C4::Auth qw( get_template_and_user );
(-)a/cataloguing/value_builder/marc21_field_008_classifications.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use C4::Auth qw( get_template_and_user );
19
use C4::Auth qw( get_template_and_user );
(-)a/cataloguing/value_builder/marc21_field_245h.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
23
(-)a/cataloguing/value_builder/marc21_field_260b.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 SYNOPSIS
20
=head1 SYNOPSIS
21
21
(-)a/cataloguing/value_builder/marc21_leader.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
use CGI qw ( -utf8 );
23
use CGI qw ( -utf8 );
(-)a/cataloguing/value_builder/marc21_leader_authorities.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
23
(-)a/cataloguing/value_builder/marc21_linking_section.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
23
(-)a/cataloguing/value_builder/marc21_orgcode.pl (-1 / +1 lines)
Lines 18-24 Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
use Modern::Perl;
23
use Modern::Perl;
24
use C4::Context;
24
use C4::Context;
(-)a/cataloguing/value_builder/stocknumber.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
use C4::Context;
23
use C4::Context;
(-)a/cataloguing/value_builder/stocknumberAV.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
use CGI qw ( -utf8 );
23
use CGI qw ( -utf8 );
(-)a/cataloguing/value_builder/stocknumberam123.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
use CGI qw ( -utf8 );
23
use CGI qw ( -utf8 );
(-)a/cataloguing/value_builder/unimarc_field_009_ppn.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
use LWP::Simple qw();
23
use LWP::Simple qw();
(-)a/cataloguing/value_builder/unimarc_field_010.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use C4::Auth qw( get_template_and_user );
21
use C4::Auth qw( get_template_and_user );
(-)a/cataloguing/value_builder/unimarc_field_100.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_100_authorities.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_105.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
21
(-)a/cataloguing/value_builder/unimarc_field_106.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_110.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
21
(-)a/cataloguing/value_builder/unimarc_field_115a.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_115b.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_116.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_117.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_120.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
21
(-)a/cataloguing/value_builder/unimarc_field_121a.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_121b.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use C4::Auth qw( get_template_and_user );
21
use C4::Auth qw( get_template_and_user );
(-)a/cataloguing/value_builder/unimarc_field_122.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use C4::Auth qw( get_template_and_user );
21
use C4::Auth qw( get_template_and_user );
(-)a/cataloguing/value_builder/unimarc_field_123a.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use C4::Auth qw( get_template_and_user );
21
use C4::Auth qw( get_template_and_user );
(-)a/cataloguing/value_builder/unimarc_field_123defg.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_123i.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_123j.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_124.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_124a.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_124b.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_124c.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_124d.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_124e.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_124f.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_124g.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_125.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_125a.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_125b.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_126.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_126a.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_126b.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_127.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_128a.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_128b.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_128c.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_130.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
21
(-)a/cataloguing/value_builder/unimarc_field_135a.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_140.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
21
(-)a/cataloguing/value_builder/unimarc_field_141.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_146a.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/cataloguing/value_builder/unimarc_field_146b.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/cataloguing/value_builder/unimarc_field_146c.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/cataloguing/value_builder/unimarc_field_146d.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/cataloguing/value_builder/unimarc_field_146e.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/cataloguing/value_builder/unimarc_field_146f.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/cataloguing/value_builder/unimarc_field_146h.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/cataloguing/value_builder/unimarc_field_146i.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/cataloguing/value_builder/unimarc_field_181-2.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_181a.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_181b.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_181c.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_182-2.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/cataloguing/value_builder/unimarc_field_182a.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_182c.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_183-2.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_183a.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_210c.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use C4::Auth qw( get_template_and_user );
21
use C4::Auth qw( get_template_and_user );
(-)a/cataloguing/value_builder/unimarc_field_210c_bis.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 SYNOPSIS
20
=head1 SYNOPSIS
21
21
(-)a/cataloguing/value_builder/unimarc_field_225a.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 SYNOPSIS
20
=head1 SYNOPSIS
21
21
(-)a/cataloguing/value_builder/unimarc_field_225a_bis.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
=head1 SYNOPSIS
18
=head1 SYNOPSIS
19
19
(-)a/cataloguing/value_builder/unimarc_field_283-2.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_283a.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_field_325h.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
######### ATTENTION c'est le contenu du fichier unimarc_field_181-2.tt %] #############
20
######### ATTENTION c'est le contenu du fichier unimarc_field_181-2.tt %] #############
21
21
(-)a/cataloguing/value_builder/unimarc_field_325j.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
######### ATTENTION c'est le contenu du fichier unimarc_field_181-2.tt %] #############
20
######### ATTENTION c'est le contenu du fichier unimarc_field_181-2.tt %] #############
21
21
(-)a/cataloguing/value_builder/unimarc_field_4XX.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
21
(-)a/cataloguing/value_builder/unimarc_field_686a.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_leader.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/unimarc_leader_authorities.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/cataloguing/value_builder/upload.pl (-1 / +1 lines)
Lines 18-24 Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
use Modern::Perl;
23
use Modern::Perl;
24
24
(-)a/cataloguing/ysearch.pl (-2 / +2 lines)
Lines 1-6 Link Here
1
#!/usr/bin/perl
1
#!/usr/bin/perl
2
2
3
# This software is placed under the gnu General Public License, v2 (http://www.gnu.org/licenses/gpl.html)
3
# This software is placed under the gnu General Public License, v2 (https://www.gnu.org/licenses/gpl.html)
4
4
5
# Copyright 2007 Tamil s.a.r.l.
5
# Copyright 2007 Tamil s.a.r.l.
6
#
6
#
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
=head1 ysearch.pl
22
=head1 ysearch.pl
23
23
(-)a/cataloguing/z3950_auth_search.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# A PARTICULAR PURPOSE. See the GNU General Public License for more details.
14
# A PARTICULAR PURPOSE. See the GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License along
16
# You should have received a copy of the GNU General Public License along
17
# with Koha; if not, see <http://www.gnu.org/licenses>.
17
# with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
20
(-)a/cataloguing/z3950_search.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
use CGI qw ( -utf8 );
22
use CGI qw ( -utf8 );
(-)a/changelanguage.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI qw ( -utf8 );
19
use CGI qw ( -utf8 );
(-)a/circ/add_message.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/circ/article-request-slip.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/circ/article-requests.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/circ/bookcount.pl (-1 / +1 lines)
Lines 18-24 Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
use Modern::Perl;
23
use Modern::Perl;
24
use CGI qw ( -utf8 );
24
use CGI qw ( -utf8 );
(-)a/circ/branchoverdues.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
use C4::Context;
20
use C4::Context;
(-)a/circ/branchtransfers.pl (-1 / +1 lines)
Lines 18-24 Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
use Modern::Perl;
23
use Modern::Perl;
24
use CGI             qw ( -utf8 );
24
use CGI             qw ( -utf8 );
(-)a/circ/checkout-notes.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/circ/circulation-home.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
#
17
#
18
18
19
use Modern::Perl;
19
use Modern::Perl;
(-)a/circ/circulation.pl (-1 / +1 lines)
Lines 20-26 Link Here
20
# GNU General Public License for more details.
20
# GNU General Public License for more details.
21
#
21
#
22
# You should have received a copy of the GNU General Public License
22
# You should have received a copy of the GNU General Public License
23
# along with Koha; if not, see <http://www.gnu.org/licenses>.
23
# along with Koha; if not, see <https://www.gnu.org/licenses>.
24
24
25
# FIXME There are too many calls to Koha::Patrons->find in this script
25
# FIXME There are too many calls to Koha::Patrons->find in this script
26
26
(-)a/circ/curbside_pickups.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI qw ( -utf8 );
19
use CGI qw ( -utf8 );
(-)a/circ/del_message.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/circ/hold-transfer-slip.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use C4::Context;
21
use C4::Context;
(-)a/circ/on-site_checkouts.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
20
(-)a/circ/overdue.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
use C4::Context;
22
use C4::Context;
(-)a/circ/pendingbookings.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/circ/pendingreserves.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/circ/renew.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/circ/request-article.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/circ/reserveratios.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/circ/returns.pl (-1 / +1 lines)
Lines 19-25 Link Here
19
# GNU General Public License for more details.
19
# GNU General Public License for more details.
20
#
20
#
21
# You should have received a copy of the GNU General Public License
21
# You should have received a copy of the GNU General Public License
22
# along with Koha; if not, see <http://www.gnu.org/licenses>.
22
# along with Koha; if not, see <https://www.gnu.org/licenses>.
23
23
24
=head1 returns.pl
24
=head1 returns.pl
25
25
(-)a/circ/set-library.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI qw ( -utf8 );
21
use CGI qw ( -utf8 );
(-)a/circ/transfer-slip.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/circ/transfers_to_send.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
# Display items which have been triggered for transfer, but not yet sent.
20
# Display items which have been triggered for transfer, but not yet sent.
21
# CAVEAT: Currently limited to transfers prompted by stockrotation only.
21
# CAVEAT: Currently limited to transfers prompted by stockrotation only.
(-)a/circ/transferstoreceive.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI qw ( -utf8 );
21
use CGI qw ( -utf8 );
(-)a/circ/view_holdsqueue.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
=head1 view_holdsqueue
18
=head1 view_holdsqueue
19
19
(-)a/circ/waitingreserves.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
use CGI qw ( -utf8 );
22
use CGI qw ( -utf8 );
(-)a/clubs/club-enrollments.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/clubs/clubs-add-modify.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/clubs/clubs.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/clubs/patron-clubs-tab.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/clubs/patron-enroll.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/clubs/templates-add-modify.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/course_reserves/add_items.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/course_reserves/batch_add_items.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/course_reserves/batch_rm_items.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/course_reserves/course-details.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/course_reserves/course-reserves.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/course_reserves/course.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/course_reserves/mod_course.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/debian/docs/koha-common.xml (-1 / +1 lines)
Lines 240-246 Link Here
240
  
240
  
241
  <refsect1><title>Bugs</title>
241
  <refsect1><title>Bugs</title>
242
  <para>The scripts are a bit fragile. If something goes wrong, they do not clean up after themselves.</para>
242
  <para>The scripts are a bit fragile. If something goes wrong, they do not clean up after themselves.</para>
243
  <para>Bugs can be reported here: <uri>http://bugs.koha-community.org/bugzilla3/</uri></para>
243
  <para>Bugs can be reported here: <uri>https://bugs.koha-community.org/bugzilla3/</uri></para>
244
  </refsect1>
244
  </refsect1>
245
245
246
  <refsect1><title>About Koha</title>
246
  <refsect1><title>About Koha</title>
(-)a/debian/docs/koha-create-dirs.xml (-1 / +1 lines)
Lines 4-10 Link Here
4
<productname>Koha</productname> is the first free software library automation package.
4
<productname>Koha</productname> is the first free software library automation package.
5
<author>
5
<author>
6
  <orgname>The Koha Community</orgname>
6
  <orgname>The Koha Community</orgname>
7
  <uri>http://koha-community.org/</uri>
7
  <uri>https://koha-community.org/</uri>
8
</author>
8
</author>
9
</info>
9
</info>
10
10
(-)a/debian/docs/koha-create.xml (-2 / +2 lines)
Lines 4-10 Link Here
4
<productname>Koha</productname> is the first free software library automation package.
4
<productname>Koha</productname> is the first free software library automation package.
5
<author>
5
<author>
6
  <orgname>The Koha Community</orgname>
6
  <orgname>The Koha Community</orgname>
7
  <uri>http://koha-community.org/</uri>
7
  <uri>https://koha-community.org/</uri>
8
</author>
8
</author>
9
</info>
9
</info>
10
10
Lines 445-451 Link Here
445
445
446
  <refsect1><title>Bugs</title>
446
  <refsect1><title>Bugs</title>
447
  <para>The program is a bit fragile. If something goes wrong, it does not clean up after itself.</para>
447
  <para>The program is a bit fragile. If something goes wrong, it does not clean up after itself.</para>
448
  <para>Bugs can be reported here: <uri>http://bugs.koha-community.org/bugzilla3/</uri></para>
448
  <para>Bugs can be reported here: <uri>https://bugs.koha-community.org/bugzilla3/</uri></para>
449
  </refsect1>
449
  </refsect1>
450
  
450
  
451
  <refsect1><title>Example</title>
451
  <refsect1><title>Example</title>
(-)a/debian/docs/koha-disable.xml (-1 / +1 lines)
Lines 4-10 Link Here
4
<productname>Koha</productname> is the first free software library automation package.
4
<productname>Koha</productname> is the first free software library automation package.
5
<author>
5
<author>
6
  <orgname>The Koha Community</orgname>
6
  <orgname>The Koha Community</orgname>
7
  <uri>http://koha-community.org/</uri>
7
  <uri>https://koha-community.org/</uri>
8
</author>
8
</author>
9
</info>
9
</info>
10
10
(-)a/debian/docs/koha-dump-defaults.xml (-1 / +1 lines)
Lines 4-10 Link Here
4
<productname>Koha</productname> is the first free software library automation package.
4
<productname>Koha</productname> is the first free software library automation package.
5
<author>
5
<author>
6
  <orgname>The Koha Community</orgname>
6
  <orgname>The Koha Community</orgname>
7
  <uri>http://koha-community.org/</uri>
7
  <uri>https://koha-community.org/</uri>
8
</author>
8
</author>
9
</info>
9
</info>
10
10
(-)a/debian/docs/koha-dump.xml (-1 / +1 lines)
Lines 4-10 Link Here
4
<productname>Koha</productname> is the first free software library automation package.
4
<productname>Koha</productname> is the first free software library automation package.
5
<author>
5
<author>
6
  <orgname>The Koha Community</orgname>
6
  <orgname>The Koha Community</orgname>
7
  <uri>http://koha-community.org/</uri>
7
  <uri>https://koha-community.org/</uri>
8
</author>
8
</author>
9
</info>
9
</info>
10
10
(-)a/debian/docs/koha-elasticsearch.xml (-1 / +1 lines)
Lines 4-10 Link Here
4
<productname>Koha</productname> is the first free software library automation package.
4
<productname>Koha</productname> is the first free software library automation package.
5
<author>
5
<author>
6
  <orgname>The Koha Community</orgname>
6
  <orgname>The Koha Community</orgname>
7
  <uri>http://koha-community.org/</uri>
7
  <uri>https://koha-community.org/</uri>
8
</author>
8
</author>
9
</info>
9
</info>
10
10
(-)a/debian/docs/koha-email-disable.xml (-1 / +1 lines)
Lines 4-10 Link Here
4
<productname>Koha</productname> is the first free software library automation package.
4
<productname>Koha</productname> is the first free software library automation package.
5
<author>
5
<author>
6
  <orgname>The Koha Community</orgname>
6
  <orgname>The Koha Community</orgname>
7
  <uri>http://koha-community.org/</uri>
7
  <uri>https://koha-community.org/</uri>
8
</author>
8
</author>
9
</info>
9
</info>
10
10
(-)a/debian/docs/koha-email-enable.xml (-1 / +1 lines)
Lines 4-10 Link Here
4
<productname>Koha</productname> is the first free software library automation package.
4
<productname>Koha</productname> is the first free software library automation package.
5
<author>
5
<author>
6
  <orgname>The Koha Community</orgname>
6
  <orgname>The Koha Community</orgname>
7
  <uri>http://koha-community.org/</uri>
7
  <uri>https://koha-community.org/</uri>
8
</author>
8
</author>
9
</info>
9
</info>
10
10
(-)a/debian/docs/koha-enable.xml (-1 / +1 lines)
Lines 4-10 Link Here
4
<productname>Koha</productname> is the first free software library automation package.
4
<productname>Koha</productname> is the first free software library automation package.
5
<author>
5
<author>
6
  <orgname>The Koha Community</orgname>
6
  <orgname>The Koha Community</orgname>
7
  <uri>http://koha-community.org/</uri>
7
  <uri>https://koha-community.org/</uri>
8
</author>
8
</author>
9
</info>
9
</info>
10
10
(-)a/debian/docs/koha-foreach.xml (-1 / +1 lines)
Lines 4-10 Link Here
4
<productname>Koha</productname> is the first free software library automation package.
4
<productname>Koha</productname> is the first free software library automation package.
5
<author>
5
<author>
6
  <orgname>The Koha Community</orgname>
6
  <orgname>The Koha Community</orgname>
7
  <uri>http://koha-community.org/</uri>
7
  <uri>https://koha-community.org/</uri>
8
</author>
8
</author>
9
</info>
9
</info>
10
10
(-)a/debian/docs/koha-indexer.xml (-1 / +1 lines)
Lines 4-10 Link Here
4
<productname>Koha</productname> is the first free software library automation package.
4
<productname>Koha</productname> is the first free software library automation package.
5
<author>
5
<author>
6
  <orgname>The Koha Community</orgname>
6
  <orgname>The Koha Community</orgname>
7
  <uri>http://koha-community.org/</uri>
7
  <uri>https://koha-community.org/</uri>
8
</author>
8
</author>
9
</info>
9
</info>
10
10
(-)a/debian/docs/koha-list.xml (-1 / +1 lines)
Lines 4-10 Link Here
4
<productname>Koha</productname> is the first free software library automation package.
4
<productname>Koha</productname> is the first free software library automation package.
5
<author>
5
<author>
6
  <orgname>The Koha Community</orgname>
6
  <orgname>The Koha Community</orgname>
7
  <uri>http://koha-community.org/</uri>
7
  <uri>https://koha-community.org/</uri>
8
</author>
8
</author>
9
</info>
9
</info>
10
10
(-)a/debian/docs/koha-mysql.xml (-1 / +1 lines)
Lines 4-10 Link Here
4
<productname>Koha</productname> is the first free software library automation package.
4
<productname>Koha</productname> is the first free software library automation package.
5
<author>
5
<author>
6
  <orgname>The Koha Community</orgname>
6
  <orgname>The Koha Community</orgname>
7
  <uri>http://koha-community.org/</uri>
7
  <uri>https://koha-community.org/</uri>
8
</author>
8
</author>
9
</info>
9
</info>
10
10
(-)a/debian/docs/koha-mysqlcheck.xml (-1 / +1 lines)
Lines 4-10 Link Here
4
<productname>Koha</productname> is the first free software library automation package.
4
<productname>Koha</productname> is the first free software library automation package.
5
<author>
5
<author>
6
  <orgname>The Koha Community</orgname>
6
  <orgname>The Koha Community</orgname>
7
  <uri>http://koha-community.org/</uri>
7
  <uri>https://koha-community.org/</uri>
8
</author>
8
</author>
9
</info>
9
</info>
10
10
(-)a/debian/docs/koha-passwd.xml (-1 / +1 lines)
Lines 9-15 Link Here
9
        </personname>
9
        </personname>
10
        <affiliation>
10
        <affiliation>
11
            <orgname>The Koha Community</orgname>
11
            <orgname>The Koha Community</orgname>
12
            <uri>http://koha-community.org</uri>
12
            <uri>https://koha-community.org</uri>
13
        </affiliation>
13
        </affiliation>
14
    </author>
14
    </author>
15
</info>
15
</info>
(-)a/debian/docs/koha-plack.xml (-1 / +1 lines)
Lines 4-10 Link Here
4
<productname>Koha</productname> is the first free software library automation package.
4
<productname>Koha</productname> is the first free software library automation package.
5
<author>
5
<author>
6
  <orgname>The Koha community</orgname>
6
  <orgname>The Koha community</orgname>
7
  <uri>http://koha-community.org/</uri>
7
  <uri>https://koha-community.org/</uri>
8
</author>
8
</author>
9
</info>
9
</info>
10
10
(-)a/debian/docs/koha-rebuild-zebra.xml (-1 / +1 lines)
Lines 4-10 Link Here
4
<productname>Koha</productname> is the first free software library automation package.
4
<productname>Koha</productname> is the first free software library automation package.
5
<author>
5
<author>
6
  <orgname>The Koha Community</orgname>
6
  <orgname>The Koha Community</orgname>
7
  <uri>http://koha-community.org/</uri>
7
  <uri>https://koha-community.org/</uri>
8
</author>
8
</author>
9
</info>
9
</info>
10
10
(-)a/debian/docs/koha-remove.xml (-1 / +1 lines)
Lines 4-10 Link Here
4
<productname>Koha</productname> is the first free software library automation package.
4
<productname>Koha</productname> is the first free software library automation package.
5
<author>
5
<author>
6
  <orgname>The Koha Community</orgname>
6
  <orgname>The Koha Community</orgname>
7
  <uri>http://koha-community.org/</uri>
7
  <uri>https://koha-community.org/</uri>
8
</author>
8
</author>
9
</info>
9
</info>
10
10
(-)a/debian/docs/koha-reset-passwd.xml (-1 / +1 lines)
Lines 4-10 Link Here
4
<productname>Koha</productname> is the first free software library automation package.
4
<productname>Koha</productname> is the first free software library automation package.
5
<author>
5
<author>
6
  <orgname>The Koha Community</orgname>
6
  <orgname>The Koha Community</orgname>
7
  <uri>http://koha-community.org/</uri>
7
  <uri>https://koha-community.org/</uri>
8
</author>
8
</author>
9
</info>
9
</info>
10
10
(-)a/debian/docs/koha-restore.xml (-1 / +1 lines)
Lines 4-10 Link Here
4
<productname>Koha</productname> is the first free software library automation package.
4
<productname>Koha</productname> is the first free software library automation package.
5
<author>
5
<author>
6
  <orgname>The Koha Community</orgname>
6
  <orgname>The Koha Community</orgname>
7
  <uri>http://koha-community.org/</uri>
7
  <uri>https://koha-community.org/</uri>
8
</author>
8
</author>
9
</info>
9
</info>
10
10
(-)a/debian/docs/koha-run-backups.xml (-1 / +1 lines)
Lines 4-10 Link Here
4
<productname>Koha</productname> is the first free software library automation package.
4
<productname>Koha</productname> is the first free software library automation package.
5
<author>
5
<author>
6
  <orgname>The Koha Community</orgname>
6
  <orgname>The Koha Community</orgname>
7
  <uri>http://koha-community.org/</uri>
7
  <uri>https://koha-community.org/</uri>
8
</author>
8
</author>
9
</info>
9
</info>
10
10
(-)a/debian/docs/koha-sitemap.xml (-1 / +1 lines)
Lines 4-10 Link Here
4
<productname>Koha</productname> is the first free software library automation package.
4
<productname>Koha</productname> is the first free software library automation package.
5
<author>
5
<author>
6
  <orgname>The Koha community</orgname>
6
  <orgname>The Koha community</orgname>
7
  <uri>http://koha-community.org/</uri>
7
  <uri>https://koha-community.org/</uri>
8
</author>
8
</author>
9
</info>
9
</info>
10
10
(-)a/debian/docs/koha-translate.xml (-1 / +1 lines)
Lines 4-10 Link Here
4
<productname>Koha</productname> is the first free software library automation package.
4
<productname>Koha</productname> is the first free software library automation package.
5
<author>
5
<author>
6
  <orgname>The Koha Community</orgname>
6
  <orgname>The Koha Community</orgname>
7
  <uri>http://koha-community.org/</uri>
7
  <uri>https://koha-community.org/</uri>
8
</author>
8
</author>
9
</info>
9
</info>
10
10
(-)a/debian/docs/koha-upgrade-schema.xml (-1 / +1 lines)
Lines 4-10 Link Here
4
<productname>Koha</productname> is the first free software library automation package.
4
<productname>Koha</productname> is the first free software library automation package.
5
<author>
5
<author>
6
  <orgname>The Koha Community</orgname>
6
  <orgname>The Koha Community</orgname>
7
  <uri>http://koha-community.org/</uri>
7
  <uri>https://koha-community.org/</uri>
8
</author>
8
</author>
9
</info>
9
</info>
10
10
(-)a/debian/docs/koha-upgrade-to-3.4.xml (-1 / +1 lines)
Lines 4-10 Link Here
4
<productname>Koha</productname> is the first free software library automation package.
4
<productname>Koha</productname> is the first free software library automation package.
5
<author>
5
<author>
6
  <orgname>The Koha Community</orgname>
6
  <orgname>The Koha Community</orgname>
7
  <uri>http://koha-community.org/</uri>
7
  <uri>https://koha-community.org/</uri>
8
</author>
8
</author>
9
</info>
9
</info>
10
10
(-)a/debian/docs/koha-zebra.xml (-1 / +1 lines)
Lines 4-10 Link Here
4
<productname>Koha</productname> is the first free software library automation package.
4
<productname>Koha</productname> is the first free software library automation package.
5
<author>
5
<author>
6
  <orgname>The Koha Community</orgname>
6
  <orgname>The Koha Community</orgname>
7
  <uri>http://koha-community.org/</uri>
7
  <uri>https://koha-community.org/</uri>
8
</author>
8
</author>
9
</info>
9
</info>
10
10
(-)a/docs/CAS/CASProxy/examples/koha_webservice.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 DESCRIPTION
20
=head1 DESCRIPTION
21
21
(-)a/docs/CAS/CASProxy/examples/proxy_cas.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 DESCRIPTION
20
=head1 DESCRIPTION
21
21
(-)a/docs/CAS/CASProxy/examples/proxy_cas_callback.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 DESCRIPTION
20
=head1 DESCRIPTION
21
21
(-)a/docs/CAS/CASProxy/examples/proxy_cas_data.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 DESCRIPTION
20
=head1 DESCRIPTION
21
21
(-)a/erm/erm.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/errors/400.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI        qw ( -utf8 );
19
use CGI        qw ( -utf8 );
(-)a/errors/401.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI        qw ( -utf8 );
19
use CGI        qw ( -utf8 );
(-)a/errors/402.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI        qw ( -utf8 );
19
use CGI        qw ( -utf8 );
(-)a/errors/403.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI        qw ( -utf8 );
19
use CGI        qw ( -utf8 );
(-)a/errors/404.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI        qw ( -utf8 );
19
use CGI        qw ( -utf8 );
(-)a/errors/500.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI        qw ( -utf8 );
19
use CGI        qw ( -utf8 );
(-)a/etc/zebradb/explain-authorities.xml (-1 / +1 lines)
Lines 46-52 Link Here
46
   
46
   
47
    <history>
47
    <history>
48
      Created for Koha 3
48
      Created for Koha 3
49
      http://koha-community.org
49
      https://koha-community.org
50
    </history>
50
    </history>
51
51
52
    <implementation  identifier="zebra" version="1.4">
52
    <implementation  identifier="zebra" version="1.4">
(-)a/etc/zebradb/explain-biblios.xml (-1 / +1 lines)
Lines 46-52 Link Here
46
   
46
   
47
    <history>
47
    <history>
48
      Created for Koha 3
48
      Created for Koha 3
49
      http://koha-community.org
49
      https://koha-community.org
50
    </history>
50
    </history>
51
51
52
    <implementation  identifier="zebra" version="1.4">
52
    <implementation  identifier="zebra" version="1.4">
(-)a/help.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI qw ( -utf8 );
21
use CGI qw ( -utf8 );
(-)a/ill/ill-requests.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/installer/data/mysql/fix_unclosed_nonaccruing_fines_bug17135.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/installer/data/mysql/labels_upgrade.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/installer/data/mysql/patroncards_upgrade.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/installer/data/mysql/updatedatabase.pl (-4 / +4 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
#
21
#
22
22
23
# Bugs/ToDo:
23
# Bugs/ToDo:
Lines 5747-5753 if ( C4::Context->preference("Version") < TransformToNum($DBversion) ) { Link Here
5747
        "INSERT INTO systempreferences (variable,value,explanation,options,type) VALUES('CatalogModuleRelink',0,'If OFF the linker will never replace the authids that are set in the cataloging module.',NULL,'YesNo');"
5747
        "INSERT INTO systempreferences (variable,value,explanation,options,type) VALUES('CatalogModuleRelink',0,'If OFF the linker will never replace the authids that are set in the cataloging module.',NULL,'YesNo');"
5748
    );
5748
    );
5749
    print
5749
    print
5750
        "Upgrade to $DBversion done (Enhancement 7284, improved authority matching, see http://wiki.koha-community.org/wiki/Bug7284_authority_matching_improvement wiki page for configuration update needed)\n";
5750
        "Upgrade to $DBversion done (Enhancement 7284, improved authority matching, see https://wiki.koha-community.org/wiki/Bug7284_authority_matching_improvement wiki page for configuration update needed)\n";
5751
    SetVersion($DBversion);
5751
    SetVersion($DBversion);
5752
}
5752
}
5753
5753
Lines 6906-6912 if ( C4::Context->preference("Version") < TransformToNum($DBversion) ) { Link Here
6906
6906
6907
    # preferences changes
6907
    # preferences changes
6908
    $dbh->do(
6908
    $dbh->do(
6909
        "INSERT INTO systempreferences (variable,value,explanation,options,type) VALUES('AgeRestrictionMarker','','Markers for age restriction indication, e.g. FSK|PEGI|Age|. See: http://wiki.koha-community.org/wiki/Age_restriction',NULL,'free')"
6909
        "INSERT INTO systempreferences (variable,value,explanation,options,type) VALUES('AgeRestrictionMarker','','Markers for age restriction indication, e.g. FSK|PEGI|Age|. See: https://wiki.koha-community.org/wiki/Age_restriction',NULL,'free')"
6910
    );
6910
    );
6911
    $dbh->do(
6911
    $dbh->do(
6912
        "INSERT INTO systempreferences (variable,value,explanation,options,type) VALUES('AgeRestrictionOverride',0,'Allow staff to check out an item with age restriction.',NULL,'YesNo')"
6912
        "INSERT INTO systempreferences (variable,value,explanation,options,type) VALUES('AgeRestrictionOverride',0,'Allow staff to check out an item with age restriction.',NULL,'YesNo')"
Lines 22392-22398 if ( CheckVersion($DBversion) ) { Link Here
22392
$DBversion = '18.12.00.056';
22392
$DBversion = '18.12.00.056';
22393
if ( CheckVersion($DBversion) ) {
22393
if ( CheckVersion($DBversion) ) {
22394
    $dbh->do(
22394
    $dbh->do(
22395
        "UPDATE systempreferences SET explanation = 'This syspref allows to define custom rules for hiding specific items at the OPAC. See http://wiki.koha-community.org/wiki/OpacHiddenItems for more information.' WHERE variable = 'OpacHiddenItems'"
22395
        "UPDATE systempreferences SET explanation = 'This syspref allows to define custom rules for hiding specific items at the OPAC. See https://wiki.koha-community.org/wiki/OpacHiddenItems for more information.' WHERE variable = 'OpacHiddenItems'"
22396
    );
22396
    );
22397
    SetVersion($DBversion);
22397
    SetVersion($DBversion);
22398
    print "Upgrade to $DBversion done (Bug 8701 - Update OpacHiddenItems system preference description)\n";
22398
    print "Upgrade to $DBversion done (Bug 8701 - Update OpacHiddenItems system preference description)\n";
(-)a/installer/install.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use diagnostics;
21
use diagnostics;
(-)a/installer/onboarding.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use C4::Context;
21
use C4::Context;
(-)a/koha-tmpl/intranet-tmpl/lib/jquery/plugins/jquery.insertatcaret.js (-1 / +1 lines)
Lines 7-13 Link Here
7
 * http://alexking.org/blog/2003/06/02/inserting-at-the-cursor-using-javascript
7
 * http://alexking.org/blog/2003/06/02/inserting-at-the-cursor-using-javascript
8
 * http://www.mail-archive.com/jquery-en@googlegroups.com/msg08708.html
8
 * http://www.mail-archive.com/jquery-en@googlegroups.com/msg08708.html
9
 * Licensed under the GPL license:
9
 * Licensed under the GPL license:
10
 * http://www.gnu.org/licenses/gpl.html
10
 * https://www.gnu.org/licenses/gpl.html
11
 */
11
 */
12
;(function($) {
12
;(function($) {
13
13
(-)a/koha-tmpl/intranet-tmpl/lib/koha/cateditor/koha-backend.js (-1 / +1 lines)
Lines 14-20 Link Here
14
 * GNU General Public License for more details.
14
 * GNU General Public License for more details.
15
 *
15
 *
16
 * You should have received a copy of the GNU General Public License
16
 * You should have received a copy of the GNU General Public License
17
 * along with Koha; if not, see <http://www.gnu.org/licenses>.
17
 * along with Koha; if not, see <https://www.gnu.org/licenses>.
18
 */
18
 */
19
19
20
define( [ '/cgi-bin/koha/svc/cataloguing/framework?frameworkcode=&callback=define', 'marc-record' ], function( defaultFramework, MARC ) {
20
define( [ '/cgi-bin/koha/svc/cataloguing/framework?frameworkcode=&callback=define', 'marc-record' ], function( defaultFramework, MARC ) {
(-)a/koha-tmpl/intranet-tmpl/lib/koha/cateditor/macros.js (-1 / +1 lines)
Lines 14-20 Link Here
14
 * GNU General Public License for more details.
14
 * GNU General Public License for more details.
15
 *
15
 *
16
 * You should have received a copy of the GNU General Public License
16
 * You should have received a copy of the GNU General Public License
17
 * along with Koha; if not, see <http://www.gnu.org/licenses>.
17
 * along with Koha; if not, see <https://www.gnu.org/licenses>.
18
 */
18
 */
19
19
20
define( [ 'macros/rancor' ], function( RancorMacro ) {
20
define( [ 'macros/rancor' ], function( RancorMacro ) {
(-)a/koha-tmpl/intranet-tmpl/lib/koha/cateditor/macros/rancor.js (-1 / +1 lines)
Lines 14-20 Link Here
14
 * GNU General Public License for more details.
14
 * GNU General Public License for more details.
15
 *
15
 *
16
 * You should have received a copy of the GNU General Public License
16
 * You should have received a copy of the GNU General Public License
17
 * along with Koha; if not, see <http://www.gnu.org/licenses>.
17
 * along with Koha; if not, see <https://www.gnu.org/licenses>.
18
 */
18
 */
19
19
20
define( [ 'marc-editor' ], function( MARCEditor ) {
20
define( [ 'marc-editor' ], function( MARCEditor ) {
(-)a/koha-tmpl/intranet-tmpl/lib/koha/cateditor/marc-editor.js (-1 / +1 lines)
Lines 14-20 Link Here
14
 * GNU General Public License for more details.
14
 * GNU General Public License for more details.
15
 *
15
 *
16
 * You should have received a copy of the GNU General Public License
16
 * You should have received a copy of the GNU General Public License
17
 * along with Koha; if not, see <http://www.gnu.org/licenses>.
17
 * along with Koha; if not, see <https://www.gnu.org/licenses>.
18
 */
18
 */
19
19
20
define( [ 'marc-record', 'koha-backend', 'preferences', 'text-marc', 'widget' ], function( MARC, KohaBackend, Preferences, TextMARC, Widget ) {
20
define( [ 'marc-record', 'koha-backend', 'preferences', 'text-marc', 'widget' ], function( MARC, KohaBackend, Preferences, TextMARC, Widget ) {
(-)a/koha-tmpl/intranet-tmpl/lib/koha/cateditor/marc-mode.js (-1 / +1 lines)
Lines 14-20 Link Here
14
 * GNU General Public License for more details.
14
 * GNU General Public License for more details.
15
 *
15
 *
16
 * You should have received a copy of the GNU General Public License
16
 * You should have received a copy of the GNU General Public License
17
 * along with Koha; if not, see <http://www.gnu.org/licenses>.
17
 * along with Koha; if not, see <https://www.gnu.org/licenses>.
18
 */
18
 */
19
19
20
// Expected format: 245 _ 1 ‡aPizza ‡c34ars
20
// Expected format: 245 _ 1 ‡aPizza ‡c34ars
(-)a/koha-tmpl/intranet-tmpl/lib/koha/cateditor/marc-record.js (-1 / +1 lines)
Lines 14-20 Link Here
14
 * GNU General Public License for more details.
14
 * GNU General Public License for more details.
15
 *
15
 *
16
 * You should have received a copy of the GNU General Public License
16
 * You should have received a copy of the GNU General Public License
17
 * along with Koha; if not, see <http://www.gnu.org/licenses>.
17
 * along with Koha; if not, see <https://www.gnu.org/licenses>.
18
 */
18
 */
19
19
20
/**
20
/**
(-)a/koha-tmpl/intranet-tmpl/lib/koha/cateditor/preferences.js (-1 / +1 lines)
Lines 14-20 Link Here
14
 * GNU General Public License for more details.
14
 * GNU General Public License for more details.
15
 *
15
 *
16
 * You should have received a copy of the GNU General Public License
16
 * You should have received a copy of the GNU General Public License
17
 * along with Koha; if not, see <http://www.gnu.org/licenses>.
17
 * along with Koha; if not, see <https://www.gnu.org/licenses>.
18
 */
18
 */
19
19
20
define( function() {
20
define( function() {
(-)a/koha-tmpl/intranet-tmpl/lib/koha/cateditor/resources.js (-1 / +1 lines)
Lines 14-20 Link Here
14
 * GNU General Public License for more details.
14
 * GNU General Public License for more details.
15
 *
15
 *
16
 * You should have received a copy of the GNU General Public License
16
 * You should have received a copy of the GNU General Public License
17
 * along with Koha; if not, see <http://www.gnu.org/licenses>.
17
 * along with Koha; if not, see <https://www.gnu.org/licenses>.
18
 */
18
 */
19
19
20
define( [ 'module' ], function( module ) {
20
define( [ 'module' ], function( module ) {
(-)a/koha-tmpl/intranet-tmpl/lib/koha/cateditor/search.js (-1 / +1 lines)
Lines 14-20 Link Here
14
 * GNU General Public License for more details.
14
 * GNU General Public License for more details.
15
 *
15
 *
16
 * You should have received a copy of the GNU General Public License
16
 * You should have received a copy of the GNU General Public License
17
 * along with Koha; if not, see <http://www.gnu.org/licenses>.
17
 * along with Koha; if not, see <https://www.gnu.org/licenses>.
18
 */
18
 */
19
19
20
define( [ 'koha-backend', 'marc-record' ], function( KohaBackend, MARC ) {
20
define( [ 'koha-backend', 'marc-record' ], function( KohaBackend, MARC ) {
(-)a/koha-tmpl/intranet-tmpl/lib/koha/cateditor/text-marc.js (-1 / +1 lines)
Lines 14-20 Link Here
14
 * GNU General Public License for more details.
14
 * GNU General Public License for more details.
15
 *
15
 *
16
 * You should have received a copy of the GNU General Public License
16
 * You should have received a copy of the GNU General Public License
17
 * along with Koha; if not, see <http://www.gnu.org/licenses>.
17
 * along with Koha; if not, see <https://www.gnu.org/licenses>.
18
 */
18
 */
19
19
20
define( [ 'marc-record' ], function( MARC ) {
20
define( [ 'marc-record' ], function( MARC ) {
(-)a/koha-tmpl/intranet-tmpl/lib/koha/cateditor/widget.js (-1 / +1 lines)
Lines 14-20 Link Here
14
 * GNU General Public License for more details.
14
 * GNU General Public License for more details.
15
 *
15
 *
16
 * You should have received a copy of the GNU General Public License
16
 * You should have received a copy of the GNU General Public License
17
 * along with Koha; if not, see <http://www.gnu.org/licenses>.
17
 * along with Koha; if not, see <https://www.gnu.org/licenses>.
18
 */
18
 */
19
19
20
define( [ 'resources' ], function( Resources ) {
20
define( [ 'resources' ], function( Resources ) {
(-)a/koha-tmpl/intranet-tmpl/prog/en/data/marc21_field_006.xml (-1 / +1 lines)
Lines 2-8 Link Here
2
2
3
<!DOCTYPE stylesheet>
3
<!DOCTYPE stylesheet>
4
4
5
<Tagfield tag="006" xmlns="http://koha-community.org" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="./marc21_field_CF.xsd">
5
<Tagfield tag="006" xmlns="https://koha-community.org" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="./marc21_field_CF.xsd">
6
  <Material id="BKS"><name>Books</name><description></description>
6
  <Material id="BKS"><name>Books</name><description></description>
7
    <Position pos="00"><name>Form of material</name><description></description>
7
    <Position pos="00"><name>Form of material</name><description></description>
8
      <Value code="a"><description>Language material</description></Value>
8
      <Value code="a"><description>Language material</description></Value>
(-)a/koha-tmpl/intranet-tmpl/prog/en/data/marc21_field_007.xml (-1 / +1 lines)
Lines 2-8 Link Here
2
2
3
<!DOCTYPE stylesheet>
3
<!DOCTYPE stylesheet>
4
4
5
<Tagfield tag="007" xmlns="http://koha-community.org" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="./marc21_field_CF.xsd">
5
<Tagfield tag="007" xmlns="https://koha-community.org" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="./marc21_field_CF.xsd">
6
  <Material id="MPS"><name>Maps</name><description></description>
6
  <Material id="MPS"><name>Maps</name><description></description>
7
    <Position pos="00"><name>Category of material</name><description></description>
7
    <Position pos="00"><name>Category of material</name><description></description>
8
      <Value code="a"><description>Map</description></Value>
8
      <Value code="a"><description>Map</description></Value>
(-)a/koha-tmpl/intranet-tmpl/prog/en/data/marc21_field_008.xml (-1 / +1 lines)
Lines 2-8 Link Here
2
2
3
<!DOCTYPE stylesheet>
3
<!DOCTYPE stylesheet>
4
4
5
<Tagfield tag="008" xmlns="http://koha-community.org" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="./marc21_field_CF.xsd">
5
<Tagfield tag="008" xmlns="https://koha-community.org" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="./marc21_field_CF.xsd">
6
  <Material id="BKS"><name>Books</name><description></description>
6
  <Material id="BKS"><name>Books</name><description></description>
7
    <Position pos="00-05"><name>Date entered on file</name><description>Computer-generated, six-character numeric string that indicates the date the MARC record was created. Recorded in the pattern yymmdd.</description></Position>
7
    <Position pos="00-05"><name>Date entered on file</name><description>Computer-generated, six-character numeric string that indicates the date the MARC record was created. Recorded in the pattern yymmdd.</description></Position>
8
    <Position pos="06"><name>Type of date/Publication status</name><description>One-character alphabetic code that indicates the type of dates given in 008/07-10 (Date 1) and 008/11-14 (Date 2). For continuing resources, the code in 008/06 also indicates the publication status.</description>
8
    <Position pos="06"><name>Type of date/Publication status</name><description>One-character alphabetic code that indicates the type of dates given in 008/07-10 (Date 1) and 008/11-14 (Date 2). For continuing resources, the code in 008/06 also indicates the publication status.</description>
(-)a/labels/barcode-print.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI        qw ( -utf8 );
19
use CGI        qw ( -utf8 );
(-)a/labels/label-create-csv.pl (-2 / +2 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
#
19
#
20
20
21
use Modern::Perl;
21
use Modern::Perl;
Lines 118-124 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the Link Here
118
GNU General Public License for more details.
118
GNU General Public License for more details.
119
119
120
You should have received a copy of the GNU General Public License
120
You should have received a copy of the GNU General Public License
121
along with Koha; if not, see <http://www.gnu.org/licenses>.
121
along with Koha; if not, see <https://www.gnu.org/licenses>.
122
122
123
=head1 DISCLAIMER OF WARRANTY
123
=head1 DISCLAIMER OF WARRANTY
124
124
(-)a/labels/label-create-pdf.pl (-2 / +2 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
Lines 275-281 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the Link Here
275
GNU General Public License for more details.
275
GNU General Public License for more details.
276
276
277
You should have received a copy of the GNU General Public License
277
You should have received a copy of the GNU General Public License
278
along with Koha; if not, see <http://www.gnu.org/licenses>.
278
along with Koha; if not, see <https://www.gnu.org/licenses>.
279
279
280
=head1 DISCLAIMER OF WARRANTY
280
=head1 DISCLAIMER OF WARRANTY
281
281
(-)a/labels/label-create-xml.pl (-2 / +2 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
#
19
#
20
20
21
use Modern::Perl;
21
use Modern::Perl;
Lines 132-138 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the Link Here
132
GNU General Public License for more details.
132
GNU General Public License for more details.
133
133
134
You should have received a copy of the GNU General Public License
134
You should have received a copy of the GNU General Public License
135
along with Koha; if not, see <http://www.gnu.org/licenses>.
135
along with Koha; if not, see <https://www.gnu.org/licenses>.
136
136
137
=head1 DISCLAIMER OF WARRANTY
137
=head1 DISCLAIMER OF WARRANTY
138
138
(-)a/labels/label-edit-batch.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/labels/label-edit-layout.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/labels/label-edit-profile.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/labels/label-edit-range.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/labels/label-edit-template.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/labels/label-home.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/labels/label-item-search.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/labels/label-manage.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/labels/label-print.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/labels/spinelabel-home.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI        qw ( -utf8 );
19
use CGI        qw ( -utf8 );
(-)a/labels/spinelabel-print.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI        qw ( -utf8 );
19
use CGI        qw ( -utf8 );
(-)a/mainpage.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
use CGI        qw ( -utf8 );
23
use CGI        qw ( -utf8 );
(-)a/members/accountline-details.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/members/alert-subscriptions.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/members/apikeys.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/members/boraccount.pl (-1 / +1 lines)
Lines 18-24 Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
use Modern::Perl;
23
use Modern::Perl;
24
use URI::Escape qw( uri_unescape );
24
use URI::Escape qw( uri_unescape );
(-)a/members/cancel-charge.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/members/default_messageprefs.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
#
19
#
20
20
21
use Modern::Perl;
21
use Modern::Perl;
(-)a/members/deletemem.pl (-1 / +1 lines)
Lines 19-25 Link Here
19
# GNU General Public License for more details.
19
# GNU General Public License for more details.
20
#
20
#
21
# You should have received a copy of the GNU General Public License
21
# You should have received a copy of the GNU General Public License
22
# along with Koha; if not, see <http://www.gnu.org/licenses>.
22
# along with Koha; if not, see <https://www.gnu.org/licenses>.
23
23
24
use Modern::Perl;
24
use Modern::Perl;
25
25
(-)a/members/discharge.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/members/discharges.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/members/files.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/members/holdshistory.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/members/housebound.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 housebound.pl
20
=head1 housebound.pl
21
21
(-)a/members/ill-requests.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/members/mancredit.pl (-1 / +1 lines)
Lines 19-25 Link Here
19
# GNU General Public License for more details.
19
# GNU General Public License for more details.
20
#
20
#
21
# You should have received a copy of the GNU General Public License
21
# You should have received a copy of the GNU General Public License
22
# along with Koha; if not, see <http://www.gnu.org/licenses>.
22
# along with Koha; if not, see <https://www.gnu.org/licenses>.
23
23
24
use Modern::Perl;
24
use Modern::Perl;
25
25
(-)a/members/maninvoice.pl (-1 / +1 lines)
Lines 20-26 Link Here
20
# GNU General Public License for more details.
20
# GNU General Public License for more details.
21
#
21
#
22
# You should have received a copy of the GNU General Public License
22
# You should have received a copy of the GNU General Public License
23
# along with Koha; if not, see <http://www.gnu.org/licenses>.
23
# along with Koha; if not, see <https://www.gnu.org/licenses>.
24
24
25
use Modern::Perl;
25
use Modern::Perl;
26
use Try::Tiny   qw( catch try );
26
use Try::Tiny   qw( catch try );
(-)a/members/member.pl (-1 / +1 lines)
Lines 19-25 Link Here
19
# GNU General Public License for more details.
19
# GNU General Public License for more details.
20
#
20
#
21
# You should have received a copy of the GNU General Public License
21
# You should have received a copy of the GNU General Public License
22
# along with Koha; if not, see <http://www.gnu.org/licenses>.
22
# along with Koha; if not, see <https://www.gnu.org/licenses>.
23
23
24
use Modern::Perl;
24
use Modern::Perl;
25
use C4::Auth           qw( get_template_and_user );
25
use C4::Auth           qw( get_template_and_user );
(-)a/members/memberentry.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
# pragma
21
# pragma
22
use Modern::Perl;
22
use Modern::Perl;
(-)a/members/members-home.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
20
(-)a/members/members-update-do.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
20
(-)a/members/members-update.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
20
(-)a/members/merge-patrons.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
20
(-)a/members/mod_debarment.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/members/moremember.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
=head1 moremember.pl
22
=head1 moremember.pl
23
23
(-)a/members/notices.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
use C4::Auth   qw( get_template_and_user );
23
use C4::Auth   qw( get_template_and_user );
(-)a/members/patronimage.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
#
19
#
20
#
20
#
21
#
21
#
(-)a/members/pay.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
=head1 pay.pl
22
=head1 pay.pl
23
23
(-)a/members/paycollect.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use URI::Escape qw( uri_escape uri_unescape );
21
use URI::Escape qw( uri_escape uri_unescape );
(-)a/members/print_overdues.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/members/printfeercpt.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/members/printinvoice.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/members/printnotice.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/members/printslip.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
=head1 moremember.pl
21
=head1 moremember.pl
22
22
(-)a/members/purchase-suggestions.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/members/readingrec.pl (-1 / +1 lines)
Lines 18-24 Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
use Modern::Perl;
23
use Modern::Perl;
24
24
(-)a/members/recallshistory.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
15
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
use CGI        qw ( -utf8 );
20
use CGI        qw ( -utf8 );
(-)a/members/routing-lists.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI        qw ( -utf8 );
21
use CGI        qw ( -utf8 );
(-)a/members/setstatus.pl (-1 / +1 lines)
Lines 20-26 Link Here
20
# GNU General Public License for more details.
20
# GNU General Public License for more details.
21
#
21
#
22
# You should have received a copy of the GNU General Public License
22
# You should have received a copy of the GNU General Public License
23
# along with Koha; if not, see <http://www.gnu.org/licenses>.
23
# along with Koha; if not, see <https://www.gnu.org/licenses>.
24
24
25
use Modern::Perl;
25
use Modern::Perl;
26
use Try::Tiny;
26
use Try::Tiny;
(-)a/members/statistics.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
=head1 members/statistics.pl
19
=head1 members/statistics.pl
20
20
(-)a/members/summary-print.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/members/two_factor_auth.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/members/update-child.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 updatechild.pl
20
=head1 updatechild.pl
21
21
(-)a/misc/add_date_fields_to_marc_records.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/misc/admin/set_password.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/misc/batchdeletebiblios.pl (-1 / +1 lines)
Lines 85-91 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the Link Here
85
GNU General Public License for more details.
85
GNU General Public License for more details.
86
86
87
You should have received a copy of the GNU General Public License
87
You should have received a copy of the GNU General Public License
88
along with Koha; if not, see <http://www.gnu.org/licenses>.
88
along with Koha; if not, see <https://www.gnu.org/licenses>.
89
89
90
=head1 DISCLAIMER OF WARRANTY
90
=head1 DISCLAIMER OF WARRANTY
91
91
(-)a/misc/bin/connexion_import_daemon.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/misc/cronjobs/advance_notices.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/misc/cronjobs/archive_purchase_suggestions.pl (-1 / +1 lines)
Lines 185-190 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the Link Here
185
GNU General Public License for more details.
185
GNU General Public License for more details.
186
186
187
You should have received a copy of the GNU General Public License
187
You should have received a copy of the GNU General Public License
188
along with Koha; if not, see <http://www.gnu.org/licenses>.
188
along with Koha; if not, see <https://www.gnu.org/licenses>.
189
189
190
=cut
190
=cut
(-)a/misc/cronjobs/automatic_checkin.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use Koha::Checkouts;
21
use Koha::Checkouts;
(-)a/misc/cronjobs/automatic_item_modification_by_age.pl (-1 / +1 lines)
Lines 108-113 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the Link Here
108
GNU General Public License for more details.
108
GNU General Public License for more details.
109
109
110
You should have received a copy of the GNU General Public License
110
You should have received a copy of the GNU General Public License
111
along with Koha; if not, see <http://www.gnu.org/licenses>.
111
along with Koha; if not, see <https://www.gnu.org/licenses>.
112
112
113
=cut
113
=cut
(-)a/misc/cronjobs/automatic_renewals.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/misc/cronjobs/batch_anonymise.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/misc/cronjobs/cart_to_shelf.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
#-----------------------------------
19
#-----------------------------------
20
20
21
=head1 NAME
21
=head1 NAME
(-)a/misc/cronjobs/check-url-quick.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use Pod::Usage   qw( pod2usage );
21
use Pod::Usage   qw( pod2usage );
(-)a/misc/cronjobs/cleanup_database.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/misc/cronjobs/cloud-kw.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use strict;
21
use strict;
22
use warnings;
22
use warnings;
(-)a/misc/cronjobs/create_koc_db.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
#
19
#
20
20
21
=head1 NAME
21
=head1 NAME
(-)a/misc/cronjobs/debar_patrons_with_fines.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/misc/cronjobs/delete_items.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/misc/cronjobs/delete_patrons.pl (-1 / +1 lines)
Lines 260-265 This file is part of Koha. Link Here
260
# GNU General Public License for more details.
260
# GNU General Public License for more details.
261
#
261
#
262
# You should have received a copy of the GNU General Public License
262
# You should have received a copy of the GNU General Public License
263
# along with Koha; if not, see <http://www.gnu.org/licenses>.
263
# along with Koha; if not, see <https://www.gnu.org/licenses>.
264
264
265
=cut
265
=cut
(-)a/misc/cronjobs/delete_records_via_leader.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
#-----------------------------------
20
#-----------------------------------
21
21
22
use Modern::Perl;
22
use Modern::Perl;
(-)a/misc/cronjobs/edi_cron.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use warnings;
20
use warnings;
21
use strict;
21
use strict;
(-)a/misc/cronjobs/erm_run_harvester.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/misc/cronjobs/fines.pl (-1 / +1 lines)
Lines 24-30 Link Here
24
# GNU General Public License for more details.
24
# GNU General Public License for more details.
25
#
25
#
26
# You should have received a copy of the GNU General Public License
26
# You should have received a copy of the GNU General Public License
27
# along with Koha; if not, see <http://www.gnu.org/licenses>.
27
# along with Koha; if not, see <https://www.gnu.org/licenses>.
28
28
29
use strict;
29
use strict;
30
use warnings;
30
use warnings;
(-)a/misc/cronjobs/gather_print_notices.pl (-1 / +1 lines)
Lines 438-443 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the Link Here
438
GNU General Public License for more details.
438
GNU General Public License for more details.
439
439
440
You should have received a copy of the GNU General Public License
440
You should have received a copy of the GNU General Public License
441
along with Koha; if not, see <http://www.gnu.org/licenses>.
441
along with Koha; if not, see <https://www.gnu.org/licenses>.
442
442
443
=cut
443
=cut
(-)a/misc/cronjobs/harvest_oai.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use warnings;
20
use warnings;
21
use strict;
21
use strict;
(-)a/misc/cronjobs/holds/auto_unsuspend_holds.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/misc/cronjobs/holds/cancel_expired_holds.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
=head1 NAME
21
=head1 NAME
22
22
(-)a/misc/cronjobs/holds/cancel_unfilled_holds.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
20
(-)a/misc/cronjobs/holds/holds_reminder.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/misc/cronjobs/import_webservice_batch.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/misc/cronjobs/longoverdue.pl (-2 / +2 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
#-----------------------------------
19
#-----------------------------------
20
20
21
=head1 NAME
21
=head1 NAME
Lines 142-148 WARNING: Flippant use of this script could set all or most of the items in your Link Here
142
          patrons for them!
142
          patrons for them!
143
143
144
WARNING:  This script is known to be faulty.  It is NOT recommended to use multiple --lost options.
144
WARNING:  This script is known to be faulty.  It is NOT recommended to use multiple --lost options.
145
          See http://bugs.koha-community.org/bugzilla3/show_bug.cgi?id=2883
145
          See https://bugs.koha-community.org/bugzilla3/show_bug.cgi?id=2883
146
146
147
=cut
147
=cut
148
148
(-)a/misc/cronjobs/marc_ordering_process.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
=head1 NAME
21
=head1 NAME
22
22
(-)a/misc/cronjobs/membership_expiry.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
=head1 NAME
21
=head1 NAME
22
22
(-)a/misc/cronjobs/notice_unprocessed_suggestions.pl (-1 / +1 lines)
Lines 138-143 This file is part of Koha. Link Here
138
# GNU General Public License for more details.
138
# GNU General Public License for more details.
139
#
139
#
140
# You should have received a copy of the GNU General Public License
140
# You should have received a copy of the GNU General Public License
141
# along with Koha; if not, see <http://www.gnu.org/licenses>.
141
# along with Koha; if not, see <https://www.gnu.org/licenses>.
142
142
143
=cut
143
=cut
(-)a/misc/cronjobs/overdue_notices.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/misc/cronjobs/patron_emailer.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
20
(-)a/misc/cronjobs/plugins_nightly.pl (-1 / +1 lines)
Lines 79-84 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the Link Here
79
GNU General Public License for more details.
79
GNU General Public License for more details.
80
80
81
You should have received a copy of the GNU General Public License
81
You should have received a copy of the GNU General Public License
82
along with Koha; if not, see <http://www.gnu.org/licenses>.
82
along with Koha; if not, see <https://www.gnu.org/licenses>.
83
83
84
=cut
84
=cut
(-)a/misc/cronjobs/process_message_queue.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/misc/cronjobs/purge_suggestions.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/misc/cronjobs/recalls/expire_recalls.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/misc/cronjobs/recalls/overdue_recalls.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/misc/cronjobs/reconcile_balances.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/misc/cronjobs/restrict_patrons_with_failed_notices.pl (-2 / +2 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
Lines 165-170 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the Link Here
165
GNU General Public License for more details.
165
GNU General Public License for more details.
166
166
167
You should have received a copy of the GNU General Public License
167
You should have received a copy of the GNU General Public License
168
along with Koha; if not, see <http://www.gnu.org/licenses>.
168
along with Koha; if not, see <https://www.gnu.org/licenses>.
169
169
170
=cut
170
=cut
(-)a/misc/cronjobs/rss/rss.pl (-1 / +1 lines)
Lines 23-29 Link Here
23
# GNU General Public License for more details.
23
# GNU General Public License for more details.
24
#
24
#
25
# You should have received a copy of the GNU General Public License
25
# You should have received a copy of the GNU General Public License
26
# along with Koha; if not, see <http://www.gnu.org/licenses>.
26
# along with Koha; if not, see <https://www.gnu.org/licenses>.
27
27
28
use Modern::Perl;
28
use Modern::Perl;
29
29
(-)a/misc/cronjobs/runreport.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/misc/cronjobs/serialsUpdate.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/misc/cronjobs/sftp_file.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use C4::Context;
19
use C4::Context;
(-)a/misc/cronjobs/share_usage_with_koha_community.pl (-1 / +1 lines)
Lines 122-127 This file is part of Koha. Link Here
122
# GNU General Public License for more details.
122
# GNU General Public License for more details.
123
#
123
#
124
# You should have received a copy of the GNU General Public License
124
# You should have received a copy of the GNU General Public License
125
# along with Koha; if not, see <http://www.gnu.org/licenses>.
125
# along with Koha; if not, see <https://www.gnu.org/licenses>.
126
126
127
=cut
127
=cut
(-)a/misc/cronjobs/sitemap.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
package Main;
20
package Main;
21
21
(-)a/misc/cronjobs/staticfines.pl (-1 / +1 lines)
Lines 23-29 Link Here
23
# GNU General Public License for more details.
23
# GNU General Public License for more details.
24
#
24
#
25
# You should have received a copy of the GNU General Public License
25
# You should have received a copy of the GNU General Public License
26
# along with Koha; if not, see <http://www.gnu.org/licenses>.
26
# along with Koha; if not, see <https://www.gnu.org/licenses>.
27
27
28
use Modern::Perl;
28
use Modern::Perl;
29
29
(-)a/misc/cronjobs/stockrotation.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/misc/cronjobs/thirdparty/TalkingTech_itiva_inbound.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/misc/cronjobs/thirdparty/TalkingTech_itiva_outbound.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/misc/cronjobs/update_patrons_category.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/misc/cronjobs/update_totalissues.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/misc/cronjobs/writeoff_debts.pl (-1 / +1 lines)
Lines 254-260 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the Link Here
254
GNU General Public License for more details.
254
GNU General Public License for more details.
255
255
256
You should have received a copy of the GNU General Public License
256
You should have received a copy of the GNU General Public License
257
along with Koha; if not, see <http://www.gnu.org/licenses>.
257
along with Koha; if not, see <https://www.gnu.org/licenses>.
258
258
259
=head1 DISCLAIMER OF WARRANTY
259
=head1 DISCLAIMER OF WARRANTY
260
260
(-)a/misc/devel/add_missing_filters.pl (-1 / +1 lines)
Lines 89-92 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the Link Here
89
GNU General Public License for more details.
89
GNU General Public License for more details.
90
90
91
You should have received a copy of the GNU General Public License
91
You should have received a copy of the GNU General Public License
92
along with Koha; if not, see <http://www.gnu.org/licenses>.
92
along with Koha; if not, see <https://www.gnu.org/licenses>.
(-)a/misc/devel/auto_rebase.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/misc/devel/coverage.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# A PARTICULAR PURPOSE. See the GNU General Public License for more details.
14
# A PARTICULAR PURPOSE. See the GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License along
16
# You should have received a copy of the GNU General Public License along
17
# with Koha; if not, see <http://www.gnu.org/licenses>.
17
# with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
=head1 NAME
19
=head1 NAME
20
20
(-)a/misc/devel/create_superlibrarian.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/misc/devel/create_test_data.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/misc/devel/get_prepared_letter.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# A PARTICULAR PURPOSE. See the GNU General Public License for more details.
14
# A PARTICULAR PURPOSE. See the GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License along
16
# You should have received a copy of the GNU General Public License along
17
# with Koha; if not, see <http://www.gnu.org/licenses>.
17
# with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
=head1 NAME
19
=head1 NAME
20
20
(-)a/misc/devel/install_plugins.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use Getopt::Long qw( GetOptions );
21
use Getopt::Long qw( GetOptions );
(-)a/misc/devel/koha_perl_deps.pl (-1 / +1 lines)
Lines 181-187 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the Link Here
181
GNU General Public License for more details.
181
GNU General Public License for more details.
182
182
183
You should have received a copy of the GNU General Public License
183
You should have received a copy of the GNU General Public License
184
along with Koha; if not, see <http://www.gnu.org/licenses>.
184
along with Koha; if not, see <https://www.gnu.org/licenses>.
185
185
186
=head1 DISCLAIMER OF WARRANTY
186
=head1 DISCLAIMER OF WARRANTY
187
187
(-)a/misc/devel/update_dbix_class_files.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
use DBIx::Class::Schema::Loader qw/ make_schema_at /;
22
use DBIx::Class::Schema::Loader qw/ make_schema_at /;
(-)a/misc/export_borrowers.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
# Script to export borrowers
20
# Script to export borrowers
21
21
(-)a/misc/export_records.pl (-2 / +2 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
use MARC::File::XML;
20
use MARC::File::XML;
Lines 508-513 This file is part of Koha. Link Here
508
# GNU General Public License for more details.
508
# GNU General Public License for more details.
509
#
509
#
510
# You should have received a copy of the GNU General Public License
510
# You should have received a copy of the GNU General Public License
511
# along with Koha; if not, see <http://www.gnu.org/licenses>.
511
# along with Koha; if not, see <https://www.gnu.org/licenses>.
512
512
513
=cut
513
=cut
(-)a/misc/import_patrons.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/misc/link_bibs_to_authorities.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/misc/load_yaml.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/misc/maintenance/acq_cancel_obsolete_orders.pl (-1 / +1 lines)
Lines 67-73 acq_cancel_obsolete_orders.pl - Script for cancelling obsolete orders Link Here
67
# GNU General Public License for more details.
67
# GNU General Public License for more details.
68
#
68
#
69
# You should have received a copy of the GNU General Public License
69
# You should have received a copy of the GNU General Public License
70
# along with Koha; if not, see <http://www.gnu.org/licenses>.
70
# along with Koha; if not, see <https://www.gnu.org/licenses>.
71
71
72
use Modern::Perl;
72
use Modern::Perl;
73
use Getopt::Long qw( GetOptions );
73
use Getopt::Long qw( GetOptions );
(-)a/misc/maintenance/auth_show_hidden_data.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
# This script walks through your authority marc records and tells you
20
# This script walks through your authority marc records and tells you
21
# which hidden fields in the framework still contain data.
21
# which hidden fields in the framework still contain data.
(-)a/misc/maintenance/borrowers-force-messaging-defaults.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/misc/maintenance/check_syspref_cache.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use Getopt::Long qw( GetOptions );
19
use Getopt::Long qw( GetOptions );
(-)a/misc/maintenance/cmp_sysprefs.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
# This script imports/exports systempreferences to file.
20
# This script imports/exports systempreferences to file.
21
# Two interesting features are:
21
# Two interesting features are:
(-)a/misc/maintenance/compare_es_to_db.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
=head1 NAME
22
=head1 NAME
23
23
(-)a/misc/maintenance/fix_accountlines_date.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/misc/maintenance/fix_accountlines_rmdupfines_bug8253.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/misc/maintenance/fix_invalid_dates.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/misc/maintenance/fix_mysql_constraints.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/misc/maintenance/fix_tags_weight.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/misc/maintenance/generate_MARC21Languages.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
#
19
#
20
20
21
use Modern::Perl;
21
use Modern::Perl;
(-)a/misc/maintenance/pseudonymize_statistics.pl (-2 / +2 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use Getopt::Long qw( GetOptions );
19
use Getopt::Long qw( GetOptions );
Lines 133-138 This file is part of Koha. Link Here
133
# GNU General Public License for more details.
133
# GNU General Public License for more details.
134
#
134
#
135
# You should have received a copy of the GNU General Public License
135
# You should have received a copy of the GNU General Public License
136
# along with Koha; if not, see <http://www.gnu.org/licenses>.
136
# along with Koha; if not, see <https://www.gnu.org/licenses>.
137
137
138
=cut
138
=cut
(-)a/misc/maintenance/remove_items_from_biblioitems.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use strict;
21
use strict;
22
use warnings;
22
use warnings;
(-)a/misc/maintenance/sanitize_records.pl (-2 / +2 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
Lines 234-239 This file is part of Koha. Link Here
234
# GNU General Public License for more details.
234
# GNU General Public License for more details.
235
#
235
#
236
# You should have received a copy of the GNU General Public License
236
# You should have received a copy of the GNU General Public License
237
# along with Koha; if not, see <http://www.gnu.org/licenses>.
237
# along with Koha; if not, see <https://www.gnu.org/licenses>.
238
238
239
=cut
239
=cut
(-)a/misc/maintenance/search_for_data_inconsistencies.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/misc/maintenance/sync_db_comments.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
use Getopt::Long qw( GetOptions );
23
use Getopt::Long qw( GetOptions );
(-)a/misc/maintenance/touch_all_biblios.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/misc/maintenance/touch_all_items.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/misc/maintenance/update_authorities.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/misc/maintenance/update_localuse_from_statistics.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/misc/migration_tools/build_oai_sets.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 DESCRIPTION
20
=head1 DESCRIPTION
21
21
(-)a/misc/migration_tools/checkNonIndexedBiblios.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
# Small script that checks if each biblio in the DB is properly indexed
20
# Small script that checks if each biblio in the DB is properly indexed
21
# if it is not and if you use -z the not-indexed biblios are inserted in zebraqueue
21
# if it is not and if you use -z the not-indexed biblios are inserted in zebraqueue
(-)a/misc/migration_tools/ifla/update.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/misc/migration_tools/import_lexile.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
#-----------------------------------
19
#-----------------------------------
20
20
21
=head1 NAME
21
=head1 NAME
(-)a/misc/migration_tools/koha-svc.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use warnings;
20
use warnings;
21
use strict;
21
use strict;
(-)a/misc/migration_tools/rebuild_zebra.pl (-2 / +2 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
Lines 252-258 my $dbh; Link Here
252
# We have chosen to exit immediately by default if we cannot obtain the lock
252
# We have chosen to exit immediately by default if we cannot obtain the lock
253
# to prevent the potential for a infinite backlog from cron invocations, but an
253
# to prevent the potential for a infinite backlog from cron invocations, but an
254
# option (wait-for-lock) is provided to let the program wait for the lock.
254
# option (wait-for-lock) is provided to let the program wait for the lock.
255
# See http://bugs.koha-community.org/bugzilla3/show_bug.cgi?id=11078 for details.
255
# See https://bugs.koha-community.org/bugzilla3/show_bug.cgi?id=11078 for details.
256
if ($daemon_mode) {
256
if ($daemon_mode) {
257
    while (1) {
257
    while (1) {
258
258
(-)a/misc/migration_tools/remove_unused_authorities.pl (-1 / +1 lines)
Lines 18-24 Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
use Modern::Perl;
23
use Modern::Perl;
24
24
(-)a/misc/migration_tools/switch_marc21_series_info.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
(-)a/misc/mod_zebraqueue.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
# script to add records to the zebraqueue from the commandline.
19
# script to add records to the zebraqueue from the commandline.
20
20
(-)a/misc/process_ill_updates.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use Getopt::Long qw( GetOptions );
21
use Getopt::Long qw( GetOptions );
(-)a/misc/recreateIssueStatistics.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
# Re-create statistics from issues and old_issues tables
20
# Re-create statistics from issues and old_issues tables
21
21
(-)a/misc/search_tools/export_elasticsearch_mappings.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
=head1 NAME
22
=head1 NAME
23
23
(-)a/misc/search_tools/rebuild_elasticsearch.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
=head1 NAME
22
=head1 NAME
23
23
(-)a/misc/sip_cli_emulator.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/misc/stage_file.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
23
(-)a/misc/translator/LangInstaller.pm (-1 / +1 lines)
Lines 15-21 package LangInstaller; Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/misc/translator/xgettext.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
=head1 NAME
18
=head1 NAME
19
19
(-)a/misc/workers/background_jobs_worker.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
=head1 NAME
18
=head1 NAME
19
19
(-)a/misc/workers/es_indexer_daemon.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
=head1 NAME
18
=head1 NAME
19
19
(-)a/misc/z3950_responder.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/offline_circ/enqueue_koc.pl (-2 / +2 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
#
19
#
20
20
21
use Modern::Perl;
21
use Modern::Perl;
Lines 97-103 output_html_with_http_headers $query, $cookie, $template->output; Link Here
97
parses the header line from a .koc file. This is the line that
97
parses the header line from a .koc file. This is the line that
98
specifies things such as the file version, and the name and version of
98
specifies things such as the file version, and the name and version of
99
the offline circulation tool that generated the file. See
99
the offline circulation tool that generated the file. See
100
L<http://wiki.koha-community.org/wiki/Koha_offline_circulation_file_format>
100
L<https://wiki.koha-community.org/wiki/Koha_offline_circulation_file_format>
101
for more information.
101
for more information.
102
102
103
pass in a string containing the header line (the first line from th
103
pass in a string containing the header line (the first line from th
(-)a/offline_circ/list.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
#
19
#
20
20
21
use Modern::Perl;
21
use Modern::Perl;
(-)a/offline_circ/process.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
#
19
#
20
20
21
use Modern::Perl;
21
use Modern::Perl;
(-)a/offline_circ/process_koc.pl (-2 / +2 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
#
19
#
20
20
21
use Modern::Perl;
21
use Modern::Perl;
Lines 109-115 output_html_with_http_headers $query, $cookie, $template->output; Link Here
109
parses the header line from a .koc file. This is the line that
109
parses the header line from a .koc file. This is the line that
110
specifies things such as the file version, and the name and version of
110
specifies things such as the file version, and the name and version of
111
the offline circulation tool that generated the file. See
111
the offline circulation tool that generated the file. See
112
L<http://wiki.koha-community.org/wiki/Koha_offline_circulation_file_format>
112
L<https://wiki.koha-community.org/wiki/Koha_offline_circulation_file_format>
113
for more information.
113
for more information.
114
114
115
pass in a string containing the header line (the first line from th
115
pass in a string containing the header line (the first line from th
(-)a/offline_circ/service.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
#
19
#
20
20
21
use Modern::Perl;
21
use Modern::Perl;
(-)a/opac/clubs/clubs-tab.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/opac/clubs/enroll.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/opac/errors/400.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI        qw ( -utf8 );
19
use CGI        qw ( -utf8 );
(-)a/opac/errors/401.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI        qw ( -utf8 );
19
use CGI        qw ( -utf8 );
(-)a/opac/errors/402.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI        qw ( -utf8 );
19
use CGI        qw ( -utf8 );
(-)a/opac/errors/403.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI        qw ( -utf8 );
19
use CGI        qw ( -utf8 );
(-)a/opac/errors/404.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI        qw ( -utf8 );
19
use CGI        qw ( -utf8 );
(-)a/opac/errors/500.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI        qw ( -utf8 );
19
use CGI        qw ( -utf8 );
(-)a/opac/external/overdrive/auth.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
use CGI qw ( -utf8 );
22
use CGI qw ( -utf8 );
(-)a/opac/ilsdi.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/opac/maintenance.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/opac/oai.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
use CGI  qw( :standard -oldstyle_urls -utf8 );
22
use CGI  qw( :standard -oldstyle_urls -utf8 );
(-)a/opac/opac-ISBDdetail.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
=head1 NAME
21
=head1 NAME
22
22
(-)a/opac/opac-MARCdetail.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
=head1 NAME
22
=head1 NAME
23
23
(-)a/opac/opac-account-pay-return.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/opac/opac-account-pay.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use utf8;
20
use utf8;
21
21
(-)a/opac/opac-account.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
use CGI qw ( -utf8 );
22
use CGI qw ( -utf8 );
(-)a/opac/opac-addbybiblionumber.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/opac/opac-alert-subscribe.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI        qw ( -utf8 );
21
use CGI        qw ( -utf8 );
(-)a/opac/opac-alert-subscriptions.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI      qw ( -utf8 );
21
use CGI      qw ( -utf8 );
(-)a/opac/opac-article-request-cancel.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/opac/opac-authorities-home.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/opac/opac-authoritiesdetail.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/opac/opac-basket.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/opac/opac-blocked.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI        qw ( -utf8 );
21
use CGI        qw ( -utf8 );
(-)a/opac/opac-browse.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
use CGI qw ( -utf8 );
23
use CGI qw ( -utf8 );
(-)a/opac/opac-browser.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 opac-browser.pl
20
=head1 opac-browser.pl
21
21
(-)a/opac/opac-changelanguage.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI qw ( -utf8 );
19
use CGI qw ( -utf8 );
(-)a/opac/opac-course-details.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/opac/opac-course-reserves.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/opac/opac-curbside-pickups.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI qw ( -utf8 );
19
use CGI qw ( -utf8 );
(-)a/opac/opac-detail.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
23
(-)a/opac/opac-discharge.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use Carp qw( carp );
21
use Carp qw( carp );
(-)a/opac/opac-dismiss-message.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI qw ( -utf8 );
21
use CGI qw ( -utf8 );
(-)a/opac/opac-downloadcart.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/opac/opac-downloadshelf.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/opac/opac-export.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/opac/opac-holdshistory.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/opac/opac-ics.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
# This script builds an ICalendar file (rfc 2445) for use in programs such as Ical
20
# This script builds an ICalendar file (rfc 2445) for use in programs such as Ical
21
21
(-)a/opac/opac-idref.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/opac/opac-illrequests.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/opac/opac-image.pl (-1 / +1 lines)
Lines 18-24 Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
#
22
#
23
#
23
#
24
#
24
#
(-)a/opac/opac-imageviewer.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/opac/opac-issue-note.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/opac/opac-library.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/opac/opac-main.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI        qw ( -utf8 );
21
use CGI        qw ( -utf8 );
(-)a/opac/opac-memberentry.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/opac/opac-messaging.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/opac/opac-modrequest-suspend.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/opac/opac-modrequest.pl (-1 / +1 lines)
Lines 19-25 Link Here
19
# GNU General Public License for more details.
19
# GNU General Public License for more details.
20
#
20
#
21
# You should have received a copy of the GNU General Public License
21
# You should have received a copy of the GNU General Public License
22
# along with Koha; if not, see <http://www.gnu.org/licenses>.
22
# along with Koha; if not, see <https://www.gnu.org/licenses>.
23
23
24
use Modern::Perl;
24
use Modern::Perl;
25
25
(-)a/opac/opac-mymessages.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/opac/opac-news-rss.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI;
21
use CGI;
(-)a/opac/opac-overdrive-search.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/opac/opac-page.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/opac/opac-passwd.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/opac/opac-patron-consent.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI qw/-utf8/;
21
use CGI qw/-utf8/;
(-)a/opac/opac-patron-image.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
use C4::Members;
22
use C4::Members;
(-)a/opac/opac-privacy.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
use CGI qw ( -utf8 );
20
use CGI qw ( -utf8 );
(-)a/opac/opac-ratings.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 SYNOPSIS
20
=head1 SYNOPSIS
21
21
(-)a/opac/opac-readingrecord.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/opac/opac-recall.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI        qw ( -utf8 );
21
use CGI        qw ( -utf8 );
(-)a/opac/opac-recalls.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
15
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
use CGI        qw ( -utf8 );
20
use CGI        qw ( -utf8 );
(-)a/opac/opac-registration-verify.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/opac/opac-renew.pl (-1 / +1 lines)
Lines 18-24 Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
use Modern::Perl;
23
use Modern::Perl;
24
24
(-)a/opac/opac-reportproblem.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI       qw ( -utf8 );
21
use CGI       qw ( -utf8 );
(-)a/opac/opac-request-article.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/opac/opac-reserve.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/opac/opac-reset-password.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/opac/opac-restrictedpage.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/opac/opac-retrieve-file.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI;
21
use CGI;
(-)a/opac/opac-review.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI        qw ( -utf8 );
21
use CGI        qw ( -utf8 );
(-)a/opac/opac-routing-lists.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI qw ( -utf8 );
19
use CGI qw ( -utf8 );
(-)a/opac/opac-search-history.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/opac/opac-search.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
# Script to perform searching
22
# Script to perform searching
23
# Mostly copied from search.pl, see POD there
23
# Mostly copied from search.pl, see POD there
(-)a/opac/opac-sendbasket.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/opac/opac-sendshelf.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/opac/opac-serial-issues.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/opac/opac-shareshelf.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/opac/opac-shelves.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/opac/opac-showmarc.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/opac/opac-showreviews.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/opac/opac-suggestions.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/opac/opac-tags.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/opac/opac-tags_subject.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 opac-tags_subject.pl
20
=head1 opac-tags_subject.pl
21
21
(-)a/opac/opac-topissues.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/opac/opac-user.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
20
(-)a/opac/opac-virtual-card.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/opac/sci/sci-main.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/opac/sco/help.pl (-1 / +1 lines)
Lines 18-24 Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
use Modern::Perl;
23
use Modern::Perl;
24
use CGI qw ( -utf8 );
24
use CGI qw ( -utf8 );
(-)a/opac/sco/printslip.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 printslip.pl
20
=head1 printslip.pl
21
21
(-)a/opac/sco/sco-main.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
# We're going to authenticate a self-check user.  we'll add a flag to borrowers 'selfcheck'
22
# We're going to authenticate a self-check user.  we'll add a flag to borrowers 'selfcheck'
23
#
23
#
(-)a/opac/sco/sco-patron-image.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use C4::Auth qw( in_iprange );
21
use C4::Auth qw( in_iprange );
(-)a/opac/tracklinks.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
use C4::Context;
22
use C4::Context;
(-)a/patron_lists/add-modify.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/patron_lists/delete.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/patron_lists/list.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/patron_lists/lists.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/patron_lists/patron-lists-tab.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/patron_lists/patrons.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/patroncards/create-pdf.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI      qw ( -utf8 );
21
use CGI      qw ( -utf8 );
(-)a/patroncards/edit-batch.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/patroncards/edit-layout.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/patroncards/edit-profile.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/patroncards/edit-template.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/patroncards/home.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/patroncards/image-manage.pl (-1 / +1 lines)
Lines 205-211 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the Link Here
205
GNU General Public License for more details.
205
GNU General Public License for more details.
206
206
207
You should have received a copy of the GNU General Public License
207
You should have received a copy of the GNU General Public License
208
along with Koha; if not, see <http://www.gnu.org/licenses>.
208
along with Koha; if not, see <https://www.gnu.org/licenses>.
209
209
210
=head1 DISCLAIMER OF WARRANTY
210
=head1 DISCLAIMER OF WARRANTY
211
211
(-)a/patroncards/manage.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/patroncards/print.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/plugins/plugins-enable.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/plugins/plugins-home.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/plugins/plugins-uninstall.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/plugins/plugins-upload.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
20
(-)a/plugins/run.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/pos/pay.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/pos/printreceipt.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/pos/register.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI;
21
use CGI;
(-)a/pos/registers.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI;
21
use CGI;
(-)a/preservation/home.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/preservation/print_slip.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI qw ( -utf8 );
19
use CGI qw ( -utf8 );
(-)a/recalls/recall_pickup_slip.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI qw ( -utf8 );
21
use CGI qw ( -utf8 );
(-)a/recalls/recalls_old_queue.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
use CGI        qw ( -utf8 );
20
use CGI        qw ( -utf8 );
(-)a/recalls/recalls_overdue.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
use CGI        qw ( -utf8 );
20
use CGI        qw ( -utf8 );
(-)a/recalls/recalls_queue.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
use CGI        qw ( -utf8 );
20
use CGI        qw ( -utf8 );
(-)a/recalls/recalls_to_pull.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
use CGI             qw ( -utf8 );
20
use CGI             qw ( -utf8 );
(-)a/recalls/recalls_waiting.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
use CGI        qw ( -utf8 );
20
use CGI        qw ( -utf8 );
(-)a/recalls/request.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
use CGI        qw ( -utf8 );
20
use CGI        qw ( -utf8 );
(-)a/reports/acquisitions_stats.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/reports/bor_issues_top.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/reports/borrowers_out.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/reports/borrowers_stats.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI qw ( -utf8 );
21
use CGI qw ( -utf8 );
(-)a/reports/cash_register_stats.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use C4::Auth qw( get_template_and_user );
19
use C4::Auth qw( get_template_and_user );
(-)a/reports/cat_issues_top.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use C4::Auth qw( get_template_and_user );
21
use C4::Auth qw( get_template_and_user );
(-)a/reports/catalog_by_itemtype.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use C4::Auth qw( get_template_and_user );
21
use C4::Auth qw( get_template_and_user );
(-)a/reports/catalogue_out.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI qw ( -utf8 );
21
use CGI qw ( -utf8 );
(-)a/reports/catalogue_stats.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use C4::Auth qw( get_template_and_user );
21
use C4::Auth qw( get_template_and_user );
(-)a/reports/dictionary.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
use Modern::Perl;
19
use Modern::Perl;
20
use C4::Auth   qw( get_template_and_user );
20
use C4::Auth   qw( get_template_and_user );
21
use CGI        qw ( -utf8 );
21
use CGI        qw ( -utf8 );
(-)a/reports/guided_reports.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI qw/-utf8/;
21
use CGI qw/-utf8/;
(-)a/reports/issues_avg_stats.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use C4::Auth qw( get_template_and_user );
21
use C4::Auth qw( get_template_and_user );
(-)a/reports/issues_stats.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/reports/itemslost.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
=head1 itemslost
21
=head1 itemslost
22
22
(-)a/reports/reports-home.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI        qw ( -utf8 );
21
use CGI        qw ( -utf8 );
(-)a/reports/reserves_stats.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/reports/serials_stats.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use C4::Auth qw( get_template_and_user );
21
use C4::Auth qw( get_template_and_user );
(-)a/reserve/modrequest.pl (-1 / +1 lines)
Lines 19-25 Link Here
19
# GNU General Public License for more details.
19
# GNU General Public License for more details.
20
#
20
#
21
# You should have received a copy of the GNU General Public License
21
# You should have received a copy of the GNU General Public License
22
# along with Koha; if not, see <http://www.gnu.org/licenses>.
22
# along with Koha; if not, see <https://www.gnu.org/licenses>.
23
23
24
use Modern::Perl;
24
use Modern::Perl;
25
use CGI qw ( -utf8 );
25
use CGI qw ( -utf8 );
(-)a/reserve/modrequest_suspendall.pl (-1 / +1 lines)
Lines 19-25 Link Here
19
# GNU General Public License for more details.
19
# GNU General Public License for more details.
20
#
20
#
21
# You should have received a copy of the GNU General Public License
21
# You should have received a copy of the GNU General Public License
22
# along with Koha; if not, see <http://www.gnu.org/licenses>.
22
# along with Koha; if not, see <https://www.gnu.org/licenses>.
23
23
24
use Modern::Perl;
24
use Modern::Perl;
25
use CGI qw ( -utf8 );
25
use CGI qw ( -utf8 );
(-)a/reserve/placerequest.pl (-1 / +1 lines)
Lines 18-24 Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
use Modern::Perl;
23
use Modern::Perl;
24
24
(-)a/reserve/request.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
=head1 request.pl
22
=head1 request.pl
23
23
(-)a/reviews/reviewswaiting.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/rotating_collections/addItems.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
#
17
#
18
18
19
use Modern::Perl;
19
use Modern::Perl;
(-)a/rotating_collections/editCollections.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
#
17
#
18
18
19
use Modern::Perl;
19
use Modern::Perl;
(-)a/rotating_collections/rotatingCollections.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
#
17
#
18
18
19
use Modern::Perl;
19
use Modern::Perl;
(-)a/rotating_collections/transferCollection.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
#
17
#
18
18
19
use Modern::Perl;
19
use Modern::Perl;
(-)a/serials/acqui-search-result.pl (-1 / +1 lines)
Lines 18-24 Link Here
18
# GNU General Public License for more details.
18
# GNU General Public License for more details.
19
#
19
#
20
# You should have received a copy of the GNU General Public License
20
# You should have received a copy of the GNU General Public License
21
# along with Koha; if not, see <http://www.gnu.org/licenses>.
21
# along with Koha; if not, see <https://www.gnu.org/licenses>.
22
22
23
=head1 NAME
23
=head1 NAME
24
24
(-)a/serials/acqui-search.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI        qw ( -utf8 );
21
use CGI        qw ( -utf8 );
(-)a/serials/checkexpiration.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
=head1 NAME
19
=head1 NAME
20
20
(-)a/serials/claims.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI         qw ( -utf8 );
21
use CGI         qw ( -utf8 );
(-)a/serials/create-numberpattern.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI qw ( -utf8 );
21
use CGI qw ( -utf8 );
(-)a/serials/lateissues-export.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI qw ( -utf8 );
19
use CGI qw ( -utf8 );
(-)a/serials/reorder_members.pl (-1 / +1 lines)
Lines 12-18 Link Here
12
# GNU General Public License for more details.
12
# GNU General Public License for more details.
13
#
13
#
14
# You should have received a copy of the GNU General Public License
14
# You should have received a copy of the GNU General Public License
15
# along with Koha; if not, see <http://www.gnu.org/licenses>.
15
# along with Koha; if not, see <https://www.gnu.org/licenses>.
16
16
17
# Routing.pl script used to create a routing list for a serial subscription
17
# Routing.pl script used to create a routing list for a serial subscription
18
# In this instance it is in fact a setting up of a list of reserves for the item
18
# In this instance it is in fact a setting up of a list of reserves for the item
(-)a/serials/routing-preview.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
# Routing Preview.pl script used to view a routing list after creation
18
# Routing Preview.pl script used to view a routing list after creation
19
# lets one print out routing slip and create (in this instance) the hierarchy
19
# lets one print out routing slip and create (in this instance) the hierarchy
(-)a/serials/routing.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
=head1 Routing.pl
18
=head1 Routing.pl
19
19
(-)a/serials/serials-collection.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
use CGI      qw ( -utf8 );
22
use CGI      qw ( -utf8 );
(-)a/serials/serials-edit.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
=head1 NAME
21
=head1 NAME
22
22
(-)a/serials/serials-home.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/serials/serials-search.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/serials/showpredictionpattern.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/serials/subscription-add.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/serials/subscription-batchedit.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/serials/subscription-bib-search.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
=head1 NAME
21
=head1 NAME
22
22
(-)a/serials/subscription-detail.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use CGI      qw ( -utf8 );
19
use CGI      qw ( -utf8 );
(-)a/serials/subscription-frequencies.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/serials/subscription-frequency.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI qw ( -utf8 );
21
use CGI qw ( -utf8 );
(-)a/serials/subscription-history.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/serials/subscription-numberpattern.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI                        qw ( -utf8 );
21
use CGI                        qw ( -utf8 );
(-)a/serials/subscription-numberpatterns.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/serials/subscription-renew.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 NAME
20
=head1 NAME
21
21
(-)a/serials/viewalerts.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI      qw ( -utf8 );
21
use CGI      qw ( -utf8 );
(-)a/services/itemrecorddisplay.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
=head1 NAME
19
=head1 NAME
20
20
(-)a/suggestion/suggestion.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
require Exporter;
21
require Exporter;
(-)a/svc/cataloguing/automatic_linker.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI;
21
use CGI;
(-)a/t/lib/Koha/BackgroundJob/BatchTest.pm (-1 / +1 lines)
Lines 13-19 package t::lib::Koha::BackgroundJob::BatchTest; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/t/lib/Mocks.pm (-1 / +1 lines)
Lines 13-19 package t::lib::Mocks; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use C4::Context;
19
use C4::Context;
(-)a/t/lib/Mocks/Logger.pm (-1 / +1 lines)
Lines 13-19 package t::lib::Mocks::Logger; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/t/lib/Mocks/Zebra.pm (-1 / +1 lines)
Lines 13-19 package t::lib::Mocks::Zebra; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use Test::More;
19
use Test::More;
(-)a/t/lib/QA/TemplateFilters.pm (-1 / +1 lines)
Lines 295-301 the Free Software Foundation; either version 3 of the License, or (at your optio Link Here
295
295
296
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.
296
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.
297
297
298
You should have received a copy of the GNU General Public License along with Koha; if not, see <http://www.gnu.org/licenses>.
298
You should have received a copy of the GNU General Public License along with Koha; if not, see <https://www.gnu.org/licenses>.
299
299
300
=cut
300
=cut
301
301
(-)a/t/lib/Selenium.pm (-2 / +2 lines)
Lines 13-19 package t::lib::Selenium; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
use Carp qw( croak );
19
use Carp qw( croak );
Lines 453-459 the Free Software Foundation; either version 3 of the License, or (at your optio Link Here
453
453
454
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.
454
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.
455
455
456
You should have received a copy of the GNU General Public License along with Koha; if not, see <http://www.gnu.org/licenses>.
456
You should have received a copy of the GNU General Public License along with Koha; if not, see <https://www.gnu.org/licenses>.
457
457
458
=cut
458
=cut
459
459
(-)a/t/lib/TestBuilder.pm (-1 / +1 lines)
Lines 865-871 the Free Software Foundation; either version 3 of the License, or (at your optio Link Here
865
865
866
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.
866
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.
867
867
868
You should have received a copy of the GNU General Public License along with Koha; if not, see <http://www.gnu.org/licenses>.
868
You should have received a copy of the GNU General Public License along with Koha; if not, see <https://www.gnu.org/licenses>.
869
869
870
=cut
870
=cut
871
871
(-)a/t/lib/plugins/Koha/Plugin/ILL/TestClass.pm (-1 / +1 lines)
Lines 12-18 package Koha::Plugin::ILL::TestClass; Link Here
12
# A PARTICULAR PURPOSE. See the GNU General Public License for more details.
12
# A PARTICULAR PURPOSE. See the GNU General Public License for more details.
13
#
13
#
14
# You should have received a copy of the GNU General Public License along
14
# You should have received a copy of the GNU General Public License along
15
# with Koha; if not, see <http://www.gnu.org/licenses>.
15
# with Koha; if not, see <https://www.gnu.org/licenses>.
16
16
17
use Modern::Perl;
17
use Modern::Perl;
18
18
(-)a/t/lib/plugins/Koha/Plugin/Test/Controller.pm (-1 / +1 lines)
Lines 13-19 package Koha::Plugin::Test::Controller; Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/tags/list.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI qw ( -utf8 );
21
use CGI qw ( -utf8 );
(-)a/tags/review.pl (-2 / +2 lines)
Lines 1-6 Link Here
1
#!/usr/bin/perl
1
#!/usr/bin/perl
2
2
3
# This software is placed under the gnu General Public License, v2 (http://www.gnu.org/licenses/gpl.html)
3
# This software is placed under the gnu General Public License, v2 (https://www.gnu.org/licenses/gpl.html)
4
4
5
# Copyright 2008 LibLime
5
# Copyright 2008 LibLime
6
#
6
#
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
use POSIX qw( ceil );
23
use POSIX qw( ceil );
(-)a/tools/access_files.pl (-1 / +1 lines)
Lines 19-25 Link Here
19
# GNU General Public License for more details.
19
# GNU General Public License for more details.
20
#
20
#
21
# You should have received a copy of the GNU General Public License
21
# You should have received a copy of the GNU General Public License
22
# along with Koha; if not, see <http://www.gnu.org/licenses>.
22
# along with Koha; if not, see <https://www.gnu.org/licenses>.
23
23
24
use Modern::Perl;
24
use Modern::Perl;
25
25
(-)a/tools/additional-contents.pl (-1 / +1 lines)
Lines 20-26 Link Here
20
# GNU General Public License for more details.
20
# GNU General Public License for more details.
21
#
21
#
22
# You should have received a copy of the GNU General Public License
22
# You should have received a copy of the GNU General Public License
23
# along with Koha; if not, see <http://www.gnu.org/licenses>.
23
# along with Koha; if not, see <https://www.gnu.org/licenses>.
24
24
25
use Modern::Perl;
25
use Modern::Perl;
26
use CGI qw ( -utf8 );
26
use CGI qw ( -utf8 );
(-)a/tools/automatic_item_modification_by_age.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
=head1 NAME
21
=head1 NAME
22
22
(-)a/tools/batchMod.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use CGI qw ( -utf8 );
20
use CGI qw ( -utf8 );
21
use Modern::Perl;
21
use Modern::Perl;
(-)a/tools/batch_delete_records.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
#
16
#
17
# You should have received a copy of the GNU General
17
# You should have received a copy of the GNU General
18
# Public License along with Koha; if not, see
18
# Public License along with Koha; if not, see
19
# <http://www.gnu.org/licenses>
19
# <https://www.gnu.org/licenses>
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/tools/batch_extend_due_dates.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
#
16
#
17
# You should have received a copy of the GNU General
17
# You should have received a copy of the GNU General
18
# Public License along with Koha; if not, see
18
# Public License along with Koha; if not, see
19
# <http://www.gnu.org/licenses>
19
# <https://www.gnu.org/licenses>
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/tools/batch_record_modification.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
#
16
#
17
# You should have received a copy of the GNU General
17
# You should have received a copy of the GNU General
18
# Public License along with Koha; if not, see
18
# Public License along with Koha; if not, see
19
# <http://www.gnu.org/licenses>
19
# <https://www.gnu.org/licenses>
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/tools/batch_records_ajax.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
=head1 NAME
21
=head1 NAME
22
22
(-)a/tools/cleanborrowers.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
#
17
#
18
#   Written by Antoine Farnault antoine@koha-fr.org on Nov. 2006.
18
#   Written by Antoine Farnault antoine@koha-fr.org on Nov. 2006.
19
19
(-)a/tools/copy-holidays.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/tools/csv-profiles.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
=head1 NAME
21
=head1 NAME
22
22
(-)a/tools/export.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
use CGI qw ( -utf8 );
20
use CGI qw ( -utf8 );
(-)a/tools/holidays.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
#####Sets holiday periods for each branch. Datedues will be extended if branch is closed -TG
18
#####Sets holiday periods for each branch. Datedues will be extended if branch is closed -TG
19
use Modern::Perl;
19
use Modern::Perl;
(-)a/tools/import_borrowers.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
# Script to take some borrowers data in a known format and load it into Koha
21
# Script to take some borrowers data in a known format and load it into Koha
22
#
22
#
(-)a/tools/inventory.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/tools/letter.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 tools/letter.pl
20
=head1 tools/letter.pl
21
21
(-)a/tools/manage-marc-import.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/tools/marc_modification_templates.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
20
(-)a/tools/modborrowers.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
# modborrowers.pl
20
# modborrowers.pl
21
#
21
#
(-)a/tools/newHolidays.pl (-2 / +2 lines)
Lines 13-20 Link Here
13
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public Lic# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# You should have received a copy of the GNU General Public Lic# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
18
19
use Modern::Perl;
19
use Modern::Perl;
20
20
(-)a/tools/overduerules.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI qw ( -utf8 );
21
use CGI qw ( -utf8 );
(-)a/tools/page.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/tools/picture-upload.pl (-1 / +1 lines)
Lines 14-20 Link Here
14
# GNU General Public License for more details.
14
# GNU General Public License for more details.
15
#
15
#
16
# You should have received a copy of the GNU General Public License
16
# You should have received a copy of the GNU General Public License
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# along with Koha; if not, see <https://www.gnu.org/licenses>.
18
#
18
#
19
#
19
#
20
#
20
#
(-)a/tools/problem-reports.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/tools/quotes-upload.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/tools/quotes.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/tools/scheduler.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use C4::Context;
21
use C4::Context;
(-)a/tools/showdiffmarc.pl (-1 / +1 lines)
Lines 17-23 Link Here
17
# GNU General Public License for more details.
17
# GNU General Public License for more details.
18
#
18
#
19
# You should have received a copy of the GNU General Public License
19
# You should have received a copy of the GNU General Public License
20
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
# along with Koha; if not, see <https://www.gnu.org/licenses>.
21
21
22
use Modern::Perl;
22
use Modern::Perl;
23
23
(-)a/tools/stage-marc-import.pl (-1 / +1 lines)
Lines 22-28 Link Here
22
# GNU General Public License for more details.
22
# GNU General Public License for more details.
23
#
23
#
24
# You should have received a copy of the GNU General Public License
24
# You should have received a copy of the GNU General Public License
25
# along with Koha; if not, see <http://www.gnu.org/licenses>.
25
# along with Koha; if not, see <https://www.gnu.org/licenses>.
26
26
27
use Modern::Perl;
27
use Modern::Perl;
28
28
(-)a/tools/stockrotation.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
=head1 stockrotation.pl
20
=head1 stockrotation.pl
21
21
(-)a/tools/tools-home.pl (-1 / +1 lines)
Lines 13-19 Link Here
13
# GNU General Public License for more details.
13
# GNU General Public License for more details.
14
#
14
#
15
# You should have received a copy of the GNU General Public License
15
# You should have received a copy of the GNU General Public License
16
# along with Koha; if not, see <http://www.gnu.org/licenses>.
16
# along with Koha; if not, see <https://www.gnu.org/licenses>.
17
17
18
use Modern::Perl;
18
use Modern::Perl;
19
19
(-)a/tools/upload-cover-image.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
#
19
#
20
#
20
#
21
#
21
#
(-)a/tools/upload-file.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/tools/upload.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI qw/-utf8/;
21
use CGI qw/-utf8/;
(-)a/tools/viewlog.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
22
(-)a/virtualshelves/addbybiblionumber.pl (-1 / +1 lines)
Lines 16-22 Link Here
16
# GNU General Public License for more details.
16
# GNU General Public License for more details.
17
#
17
#
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <https://www.gnu.org/licenses>.
20
20
21
=head1 NAME
21
=head1 NAME
22
22
(-)a/virtualshelves/downloadshelf.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/virtualshelves/sendshelf.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
(-)a/virtualshelves/shelves.pl (-1 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use CGI             qw ( -utf8 );
21
use CGI             qw ( -utf8 );
(-)a/xt/author/show-template-structure.pl (-2 / +2 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
Lines 167-173 exit 0; Link Here
167
167
168
=head1 AUTHOR
168
=head1 AUTHOR
169
169
170
Koha Development Team <http://koha-community.org/>
170
Koha Development Team <https://koha-community.org/>
171
171
172
Galen Charlton <gmcharlt@gmail.com>
172
Galen Charlton <gmcharlt@gmail.com>
173
173
(-)a/xt/yaml_valid.pl (-2 / +1 lines)
Lines 15-21 Link Here
15
# GNU General Public License for more details.
15
# GNU General Public License for more details.
16
#
16
#
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <https://www.gnu.org/licenses>.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use Getopt::Long qw( GetOptions );
21
use Getopt::Long qw( GetOptions );
22
- 

Return to bug 40163