@@ -, +, @@ - Check that it now says 'use Modern::Perl' and not 'use trict; use --- svc/authentication | 3 +-- svc/bib | 3 +-- svc/bib_profile | 3 +-- svc/checkouts | 3 +-- svc/config/systempreferences | 3 +-- svc/import_bib | 3 +-- svc/new_bib | 3 +-- 7 files changed, 7 insertions(+), 14 deletions(-) --- a/svc/authentication +++ a/svc/authentication @@ -18,8 +18,7 @@ # along with Koha; if not, see . # -use strict; -use warnings; +use Modern::Perl; use CGI qw ( -utf8 ); use C4::Auth qw/check_api_auth/; --- a/svc/bib +++ a/svc/bib @@ -19,8 +19,7 @@ # along with Koha; if not, see . # -use strict; -use warnings; +use Modern::Perl; use CGI qw ( -utf8 ); use C4::Auth qw/check_api_auth/; --- a/svc/bib_profile +++ a/svc/bib_profile @@ -18,8 +18,7 @@ # along with Koha; if not, see . # -use strict; -use warnings; +use Modern::Perl; use CGI qw ( -utf8 ); use C4::Auth qw/check_api_auth/; --- a/svc/checkouts +++ a/svc/checkouts @@ -17,8 +17,7 @@ # with Koha; if not, write to the Free Software Foundation, Inc., # 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. -use strict; -use warnings; +use Modern::Perl; use CGI; use JSON qw(to_json); --- a/svc/config/systempreferences +++ a/svc/config/systempreferences @@ -18,8 +18,7 @@ # along with Koha; if not, see . # -use strict; -use warnings; +use Modern::Perl; use C4::Context; use C4::Service; --- a/svc/import_bib +++ a/svc/import_bib @@ -18,8 +18,7 @@ # along with Koha; if not, see . # -use strict; -use warnings; +use Modern::Perl; use CGI qw ( -utf8 ); use C4::Auth qw/check_api_auth/; --- a/svc/new_bib +++ a/svc/new_bib @@ -18,8 +18,7 @@ # along with Koha; if not, see . # -use strict; -use warnings; +use Modern::Perl; use CGI qw ( -utf8 ); use C4::Auth qw/check_api_auth/; --