Browse Source

Bug 11944: use CGI( -utf8 ) everywhere

Signed-off-by: Paola Rossi <paola.rossi@cineca.it>
Signed-off-by: Bernardo Gonzalez Kriegel <bgkriegel@gmail.com>
Signed-off-by: Dobrica Pavlinusic <dpavlin@rot13.org>

Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
Signed-off-by: Tomas Cohen Arazi <tomascohen@gmail.com>
3.20.x
Jonathan Druart 8 years ago
committed by Tomas Cohen Arazi
parent
commit
e20270fec4
  1. 2
      C4/Auth.pm
  2. 2
      C4/Auth_with_cas.pm
  3. 2
      C4/Debug.pm
  4. 2
      C4/Form/MessagingPreferences.pm
  5. 4
      C4/ILSDI/Services.pm
  6. 2
      C4/Input.pm
  7. 2
      C4/InstallAuth.pm
  8. 2
      C4/Reports.pm
  9. 2
      C4/Reports/Guided.pm
  10. 2
      C4/SIP/ILS/Transaction/Checkout.pm
  11. 2
      C4/SIP/Sip/MsgType.pm
  12. 2
      C4/SIP/t/03checkout.t
  13. 2
      C4/SIP/t/SIPtest.pm
  14. 2
      C4/Service.pm
  15. 2
      C4/Suggestions.pm
  16. 4
      C4/Templates.pm
  17. 2
      C4/Utils/DataTables.pm
  18. 2
      C4/VirtualShelves/Page.pm
  19. 2
      about.pl
  20. 2
      acqui/acqui-home.pl
  21. 2
      acqui/addorder.pl
  22. 2
      acqui/addorderiso2709.pl
  23. 2
      acqui/ajax-getauthvaluedropbox.pl
  24. 2
      acqui/aqbasketuser_search.pl
  25. 2
      acqui/basket.pl
  26. 2
      acqui/basketgroup.pl
  27. 2
      acqui/basketheader.pl
  28. 2
      acqui/booksellers.pl
  29. 2
      acqui/check_budget_total.pl
  30. 2
      acqui/check_duplicate_barcode_ajax.pl
  31. 2
      acqui/check_uniqueness.pl
  32. 2
      acqui/currency.pl
  33. 2
      acqui/finishreceive.pl
  34. 2
      acqui/histsearch.pl
  35. 2
      acqui/invoice.pl
  36. 2
      acqui/invoices.pl
  37. 2
      acqui/lateorders-export.pl
  38. 2
      acqui/lateorders.pl
  39. 2
      acqui/modordernotes.pl
  40. 2
      acqui/neworderbiblio.pl
  41. 2
      acqui/neworderempty.pl
  42. 2
      acqui/newordersubscription.pl
  43. 2
      acqui/newordersuggestion.pl
  44. 2
      acqui/ordered.pl
  45. 2
      acqui/orderreceive.pl
  46. 2
      acqui/parcel.pl
  47. 2
      acqui/parcels.pl
  48. 2
      acqui/spent.pl
  49. 2
      acqui/supplier.pl
  50. 2
      acqui/transferorder.pl
  51. 2
      acqui/uncertainprice.pl
  52. 2
      acqui/updatesupplier.pl
  53. 2
      admin/admin-home.pl
  54. 2
      admin/aqbudget_user_search.pl
  55. 3
      admin/aqbudgetperiods.pl
  56. 2
      admin/aqbudgets.pl
  57. 2
      admin/aqcontract.pl
  58. 2
      admin/aqplan.pl
  59. 2
      admin/auth_subfields_structure.pl
  60. 2
      admin/auth_tag_structure.pl
  61. 2
      admin/authorised_values.pl
  62. 2
      admin/authtypes.pl
  63. 2
      admin/biblio_framework.pl
  64. 2
      admin/branch_transfer_limits.pl
  65. 2
      admin/branches.pl
  66. 2
      admin/categorie.pl
  67. 2
      admin/check_budget_parent.pl
  68. 2
      admin/check_parent_total.pl
  69. 2
      admin/checkmarc.pl
  70. 2
      admin/cities.pl
  71. 2
      admin/classsources.pl
  72. 2
      admin/clone-rules.pl
  73. 2
      admin/currency.pl
  74. 2
      admin/didyoumean.pl
  75. 2
      admin/env_tz_test.pl
  76. 2
      admin/fieldmapping.pl
  77. 2
      admin/import_export_framework.pl
  78. 2
      admin/item_circulation_alerts.pl
  79. 2
      admin/itemtypes.pl
  80. 2
      admin/koha2marclinks.pl
  81. 2
      admin/marc_subfields_structure.pl
  82. 2
      admin/marctagstructure.pl
  83. 2
      admin/matching-rules.pl
  84. 2
      admin/oai_set_mappings.pl
  85. 2
      admin/oai_sets.pl
  86. 2
      admin/patron-attr-types.pl
  87. 2
      admin/preferences.pl
  88. 2
      admin/printers.pl
  89. 2
      admin/smart-rules.pl
  90. 2
      admin/stopwords.pl
  91. 2
      admin/systempreferences.pl
  92. 2
      admin/transport-cost-matrix.pl
  93. 2
      admin/z3950servers.pl
  94. 2
      authorities/auth_finder.pl
  95. 2
      authorities/authorities-home.pl
  96. 2
      authorities/authorities.pl
  97. 2
      authorities/blinddetail-biblio-search.pl
  98. 2
      authorities/detail-biblio-search.pl
  99. 2
      authorities/detail.pl
  100. 2
      authorities/export.pl

2
C4/Auth.pm

@ -90,7 +90,7 @@ C4::Auth - Authenticates Koha users
=head1 SYNOPSIS
use CGI;
use CGI qw ( -utf8 );
use C4::Auth;
use C4::Output;

2
C4/Auth_with_cas.pm

@ -23,7 +23,7 @@ use warnings;
use C4::Debug;
use C4::Context;
use Authen::CAS::Client;
use CGI;
use CGI qw ( -utf8 );
use FindBin;

2
C4/Debug.pm

@ -22,7 +22,7 @@ use warnings;
use Exporter;
# use CGI;
# use CGI qw ( -utf8 );
use vars qw($VERSION @ISA @EXPORT $debug $cgi_debug);
# use vars qw(@EXPORT_OK %EXPORT_TAGS);

2
C4/Form/MessagingPreferences.pm

@ -20,7 +20,7 @@ package C4::Form::MessagingPreferences;
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Context;
use C4::Members::Messaging;
use C4::Debug;

4
C4/ILSDI/Services.pm

@ -31,7 +31,7 @@ use C4::Context;
use C4::AuthoritiesMarc;
use XML::Simple;
use HTML::Entities;
use CGI;
use CGI qw ( -utf8 );
use DateTime;
use C4::Auth;
@ -49,7 +49,7 @@ hashref that will be printed by XML::Simple in opac/ilsdi.pl
use C4::ILSDI::Services;
use XML::Simple;
use CGI;
use CGI qw ( -utf8 );
my $cgi = new CGI;

2
C4/Input.pm

@ -23,7 +23,7 @@ use warnings;
require Exporter;
use C4::Context;
use CGI;
use CGI qw ( -utf8 );
use vars qw($VERSION @ISA @EXPORT);

2
C4/InstallAuth.pm

@ -39,7 +39,7 @@ InstallAuth - Authenticates Koha users for Install process
=head1 SYNOPSIS
use CGI;
use CGI qw ( -utf8 );
use InstallAuth;
use C4::Output;

2
C4/Reports.pm

@ -19,7 +19,7 @@ package C4::Reports;
use strict;
#use warnings; FIXME - Bug 2505
use CGI;
use CGI qw ( -utf8 );
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
use C4::Context;

2
C4/Reports/Guided.pm

@ -19,7 +19,7 @@ package C4::Reports::Guided;
use strict;
#use warnings; FIXME - Bug 2505 this module needs a lot of repair to run clean under warnings
use CGI;
use CGI qw ( -utf8 );
use Carp;
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);

2
C4/SIP/ILS/Transaction/Checkout.pm

@ -10,7 +10,7 @@ use strict;
use POSIX qw(strftime);
use Sys::Syslog qw(syslog);
use Data::Dumper;
use CGI;
use CGI qw ( -utf8 );
use ILS;
use ILS::Transaction;

2
C4/SIP/Sip/MsgType.pm

@ -16,7 +16,7 @@ use Sip::Constants qw(:all);
use Sip::Checksum qw(verify_cksum);
use Data::Dumper;
use CGI;
use CGI qw ( -utf8 );
use C4::Auth qw(&check_api_auth);
use UNIVERSAL qw(can); # make sure this is *after* C4 modules.

2
C4/SIP/t/03checkout.t

@ -5,7 +5,7 @@ use strict;
use warnings;
use Clone qw(clone);
use CGI;
use CGI qw ( -utf8 );
use Sip::Constants qw(:all);
use SIPtest qw(

2
C4/SIP/t/SIPtest.pm

@ -38,7 +38,7 @@ BEGIN {
# The number of tests is set in run_sip_tests() below, based
# on the size of the array of tests.
use Test::More;
use CGI;
use CGI qw ( -utf8 );
use IO::Socket::INET;
use Sip qw(:all);

2
C4/Service.pm

@ -41,7 +41,7 @@ This module packages several useful functions for JSON webservices.
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Auth qw( check_api_auth );
use C4::Output qw( :ajax );
use C4::Output::JSONStream;

2
C4/Suggestions.pm

@ -21,7 +21,7 @@ package C4::Suggestions;
use strict;
#use warnings; FIXME - Bug 2505
use CGI;
use CGI qw ( -utf8 );
use C4::Context;
use C4::Output;

4
C4/Templates.pm

@ -3,8 +3,8 @@ package C4::Templates;
use strict;
use warnings;
use Carp;
use CGI;
use List::MoreUtils qw/any uniq/;
use CGI qw ( -utf8 );
use List::MoreUtils qw/ any uniq /;
# Copyright 2009 Chris Cormack and The Koha Dev Team
#

2
C4/Utils/DataTables.pm

@ -35,7 +35,7 @@ C4::Utils::DataTables - Utility subs for building query when DataTables source i
=head1 SYNOPSYS
use CGI;
use CGI qw ( -utf8 );
use C4::Context;
use C4::Utils::DataTables;

2
C4/VirtualShelves/Page.pm

@ -23,7 +23,7 @@ package C4::VirtualShelves::Page;
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use Exporter;
use Data::Dumper;

2
about.pl

@ -23,7 +23,7 @@
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use LWP::Simple;
use XML::Simple;
use Config;

2
acqui/acqui-home.pl

@ -29,7 +29,7 @@ this script is the main page for acqui
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Auth;
use C4::Output;
use C4::Acquisition;

2
acqui/addorder.pl

@ -121,7 +121,7 @@ if it is an order from an existing suggestion : the id of this suggestion.
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Auth; # get_template_and_user
use C4::Acquisition; # ModOrder
use C4::Suggestions; # ModStatus

2
acqui/addorderiso2709.pl

@ -22,7 +22,7 @@
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use Modern::Perl;
use CGI;
use CGI qw ( -utf8 );
use Carp;
use YAML qw/Load/;

2
acqui/ajax-getauthvaluedropbox.pl

@ -47,7 +47,7 @@ Default value for the dropbox.
use Modern::Perl;
use CGI;
use CGI qw ( -utf8 );
use C4::Koha;
use C4::Charset;
use C4::Auth qw/check_api_auth/;

2
acqui/aqbasketuser_search.pl

@ -21,7 +21,7 @@
use Modern::Perl;
use CGI;
use CGI qw ( -utf8 );
use C4::Auth;
use C4::Output;
use C4::Members;

2
acqui/basket.pl

@ -25,7 +25,7 @@ use warnings;
use C4::Auth;
use C4::Koha;
use C4::Output;
use CGI;
use CGI qw ( -utf8 );
use C4::Acquisition;
use C4::Budgets;
use C4::Branch;

2
acqui/basketgroup.pl

@ -50,7 +50,7 @@ use Carp;
use C4::Input;
use C4::Auth;
use C4::Output;
use CGI;
use CGI qw ( -utf8 );
use C4::Budgets qw/ConvertCurrency/;
use C4::Acquisition qw/CloseBasketgroup ReOpenBasketgroup GetOrders GetBasketsByBasketgroup GetBasketsByBookseller ModBasketgroup NewBasketgroup DelBasketgroup GetBasketgroups ModBasket GetBasketgroup GetBasket GetBasketGroupAsCSV/;

2
acqui/basketheader.pl

@ -47,7 +47,7 @@ If it exists, C<$basketno> is the basket we edit
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Context;
use C4::Auth;
use C4::Branch;

2
acqui/booksellers.pl

@ -57,7 +57,7 @@ use C4::Auth;
use C4::Biblio;
use C4::Budgets;
use C4::Output;
use CGI;
use CGI qw ( -utf8 );
use C4::Acquisition qw/ GetBasketsInfosByBookseller CanUserManageBasket /;
use C4::Members qw/GetMember/;

2
acqui/check_budget_total.pl

@ -19,7 +19,7 @@
use strict;
#use warnings; FIXME - Bug 2505
use CGI;
use CGI qw ( -utf8 );
use C4::Context;
use C4::Output;
use C4::Auth;

2
acqui/check_duplicate_barcode_ajax.pl

@ -19,7 +19,7 @@
use strict;
#use warnings; FIXME - Bug 2505
use CGI;
use CGI qw ( -utf8 );
use CGI::Cookie;
use JSON;
use C4::Auth;

2
acqui/check_uniqueness.pl

@ -31,7 +31,7 @@
use Modern::Perl;
use CGI;
use CGI qw ( -utf8 );
use JSON;
use C4::Output;
use C4::Items;

2
acqui/currency.pl

@ -22,7 +22,7 @@
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Acquisition;
use C4::Biblio;
use C4::Budgets;

2
acqui/finishreceive.pl

@ -22,7 +22,7 @@
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Auth;
use C4::Output;
use C4::Context;

2
acqui/histsearch.pl

@ -51,7 +51,7 @@ to filter on ended date.
use strict;
#use warnings; FIXME - Bug 2505
use CGI;
use CGI qw ( -utf8 );
use C4::Auth; # get_template_and_user
use C4::Output;
use C4::Acquisition;

2
acqui/invoice.pl

@ -29,7 +29,7 @@ Invoice details
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Auth;
use C4::Output;
use C4::Acquisition;

2
acqui/invoices.pl

@ -29,7 +29,7 @@ Search for invoices
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Auth;
use C4::Output;

2
acqui/lateorders-export.pl

@ -16,7 +16,7 @@
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
use CGI;
use CGI qw ( -utf8 );
use C4::Auth;
use C4::Acquisition;

2
acqui/lateorders.pl

@ -44,7 +44,7 @@ To know on which branch this script have to display late order.
=cut
use Modern::Perl;
use CGI;
use CGI qw ( -utf8 );
use C4::Bookseller qw( GetBooksellersWithLateOrders );
use C4::Auth;
use C4::Koha;

2
acqui/modordernotes.pl

@ -28,7 +28,7 @@ Modify just notes when basket is closed.
use Modern::Perl;
use CGI;
use CGI qw ( -utf8 );
use C4::Auth;
use C4::Output;
use C4::Acquisition;

2
acqui/neworderbiblio.pl

@ -59,7 +59,7 @@ use strict;
#use warnings; FIXME - Bug 2505
use C4::Search;
use CGI;
use CGI qw ( -utf8 );
use C4::Biblio;
use C4::Auth;
use C4::Output;

2
acqui/neworderempty.pl

@ -68,7 +68,7 @@ the item's id in the breeding reservoir
use warnings;
use strict;
use CGI;
use CGI qw ( -utf8 );
use C4::Context;
use C4::Input;

2
acqui/newordersubscription.pl

@ -18,7 +18,7 @@
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use Modern::Perl;
use CGI;
use CGI qw ( -utf8 );
use C4::Acquisition;
use C4::Auth;
use C4::Branch;

2
acqui/newordersuggestion.pl

@ -91,7 +91,7 @@ can be equal to
use strict;
#use warnings; FIXME - Bug 2505
use CGI;
use CGI qw ( -utf8 );
use C4::Auth; # get_template_and_user
use C4::Output;
use C4::Suggestions;

2
acqui/ordered.pl

@ -30,7 +30,7 @@ this script is to show orders ordered but not yet received
use C4::Context;
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Auth;
use C4::Output;

2
acqui/orderreceive.pl

@ -61,7 +61,7 @@ The biblionumber of this order.
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Context;
use C4::Koha; # GetKohaAuthorisedValues GetItemTypes
use C4::Acquisition;

2
acqui/parcel.pl

@ -62,7 +62,7 @@ use C4::Acquisition;
use C4::Budgets;
use C4::Biblio;
use C4::Items;
use CGI;
use CGI qw ( -utf8 );
use C4::Output;
use C4::Dates qw/format_date format_date_in_iso/;
use C4::Suggestions;

2
acqui/parcels.pl

@ -68,7 +68,7 @@ To know how many results have to be display / page.
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Auth;
use C4::Output;

2
acqui/spent.pl

@ -34,7 +34,7 @@ use C4::Auth;
use C4::Output;
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
my $dbh = C4::Context->dbh;
my $input = new CGI;

2
acqui/supplier.pl

@ -46,7 +46,7 @@ use C4::Auth;
use C4::Contract;
use C4::Biblio;
use C4::Output;
use CGI;
use CGI qw ( -utf8 );
use C4::Bookseller qw( DelBookseller );
use C4::Bookseller::Contact;

2
acqui/transferorder.pl

@ -20,7 +20,7 @@
# along with Koha; if not, see <http://www.gnu.org/licenses>
use Modern::Perl;
use CGI;
use CGI qw ( -utf8 );
use C4::Auth;
use C4::Output;

2
acqui/uncertainprice.pl

@ -49,7 +49,7 @@ use warnings;
use C4::Input;
use C4::Auth;
use C4::Output;
use CGI;
use CGI qw ( -utf8 );
use C4::Bookseller::Contact;
use C4::Acquisition qw/SearchOrders GetOrder ModOrder/;

2
acqui/updatesupplier.pl

@ -56,7 +56,7 @@ use C4::Bookseller qw( ModBookseller AddBookseller );
use C4::Bookseller::Contact;
use C4::Biblio;
use C4::Output;
use CGI;
use CGI qw ( -utf8 );
my $input=new CGI;
my ($template, $loggedinuser, $cookie) = get_template_and_user(

2
admin/admin-home.pl

@ -18,7 +18,7 @@
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Auth;
use C4::Output;

2
admin/aqbudget_user_search.pl

@ -23,7 +23,7 @@ use Modern::Perl;
use C4::Auth ;
use C4::Output;
use CGI;
use CGI qw ( -utf8 );
use C4::Dates qw/format_date/;
use C4::Members;

3
admin/aqbudgetperiods.pl

@ -46,7 +46,8 @@ script to administer the budget periods table
use Modern::Perl;
use CGI;
use Number::Format qw(format_price);
use CGI qw ( -utf8 );
use List::Util qw/min/;
use Koha::DateUtils;
use Koha::Database;

2
admin/aqbudgets.pl

@ -21,7 +21,7 @@
use Modern::Perl;
use CGI;
use CGI qw ( -utf8 );
use List::Util qw/min/;
use Koha::Database;

2
admin/aqcontract.pl

@ -22,7 +22,7 @@
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Context;
use C4::Auth;
use C4::Output;

2
admin/aqplan.pl

@ -22,7 +22,7 @@
use strict;
#use warnings; FIXME - Bug 2505
use CGI;
use CGI qw ( -utf8 );
use List::Util qw/min/;
use Date::Calc qw/Delta_YMD Easter_Sunday Today Decode_Date_EU/;
use Date::Manip qw/ ParseDate UnixDate DateCalc/;

2
admin/auth_subfields_structure.pl

@ -21,7 +21,7 @@ use strict;
#use warnings; FIXME - Bug 2505
use C4::Output;
use C4::Auth;
use CGI;
use CGI qw ( -utf8 );
use C4::Context;
use C4::Koha;

2
admin/auth_tag_structure.pl

@ -20,7 +20,7 @@
use strict;
#use warnings; FIXME - Bug 2505
use CGI;
use CGI qw ( -utf8 );
use C4::Auth;
use C4::Koha;
use C4::Context;

2
admin/authorised_values.pl

@ -20,7 +20,7 @@
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Auth;
use C4::Branch;
use C4::Context;

2
admin/authtypes.pl

@ -22,7 +22,7 @@
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Context;
use C4::Auth;
use C4::Output;

2
admin/biblio_framework.pl

@ -23,7 +23,7 @@
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Context;
use C4::Auth;
use C4::Output;

2
admin/branch_transfer_limits.pl

@ -21,7 +21,7 @@
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Auth;
use C4::Context;
use C4::Output;

2
admin/branches.pl

@ -39,7 +39,7 @@
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Auth;
use C4::Context;
use C4::Output;

2
admin/categorie.pl

@ -37,7 +37,7 @@
use Modern::Perl;
use CGI;
use CGI qw ( -utf8 );
use C4::Context;
use C4::Auth;
use C4::Branch;

2
admin/check_budget_parent.pl

@ -19,7 +19,7 @@
use strict;
#use warnings; FIXME - Bug 2505
use CGI;
use CGI qw ( -utf8 );
use C4::Context;
use C4::Output;
use C4::Auth;

2
admin/check_parent_total.pl

@ -19,7 +19,7 @@
use strict;
#use warnings; FIXME - Bug 2505
use CGI;
use CGI qw ( -utf8 );
use C4::Context;
use C4::Output;
use C4::Auth;

2
admin/checkmarc.pl

@ -22,7 +22,7 @@ use strict;
#use warnings; FIXME - Bug 2505
use C4::Output;
use C4::Auth;
use CGI;
use CGI qw ( -utf8 );
use C4::Context;
use C4::Biblio;

2
admin/cities.pl

@ -19,7 +19,7 @@
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Context;
use C4::Auth;
use C4::Output;

2
admin/classsources.pl

@ -20,7 +20,7 @@
use strict;
#use warnings; FIXME - Bug 2505
use CGI;
use CGI qw ( -utf8 );
use C4::Auth;
use C4::Context;
use C4::Output;

2
admin/clone-rules.pl

@ -27,7 +27,7 @@
use strict;
#use warnings; FIXME - Bug 2505
use CGI;
use CGI qw ( -utf8 );
use C4::Context;
use C4::Output;
use C4::Auth;

2
admin/currency.pl

@ -39,7 +39,7 @@
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Context;
use C4::Auth;
use C4::Output;

2
admin/didyoumean.pl

@ -2,7 +2,7 @@
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Context;
use C4::Auth;
use C4::Output;

2
admin/env_tz_test.pl

@ -2,7 +2,7 @@
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
# use Data::Dumper;
use C4::Context;

2
admin/fieldmapping.pl

@ -18,7 +18,7 @@
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Auth;
use C4::Biblio;
use C4::Koha;

2
admin/import_export_framework.pl

@ -20,7 +20,7 @@
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use CGI::Cookie;
use C4::Context;
use C4::Auth qw/check_cookie_auth/;

2
admin/item_circulation_alerts.pl

@ -18,7 +18,7 @@
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use File::Basename;
use Encode;
use JSON;

2
admin/itemtypes.pl

@ -42,7 +42,7 @@ written 20/02/2002 by paul.poulain@free.fr
use strict;
#use warnings; FIXME - Bug 2505
use CGI;
use CGI qw ( -utf8 );
use List::Util qw/min/;
use File::Spec;

2
admin/koha2marclinks.pl

@ -21,7 +21,7 @@ use strict;
use warnings;
use C4::Output;
use C4::Auth;
use CGI;
use CGI qw ( -utf8 );
use C4::Context;
use C4::Biblio;

2
admin/marc_subfields_structure.pl

@ -21,7 +21,7 @@ use strict;
#use warnings; FIXME - Bug 2505
use C4::Output;
use C4::Auth;
use CGI;
use CGI qw ( -utf8 );
use C4::Context;

2
admin/marctagstructure.pl

@ -20,7 +20,7 @@
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Auth;
use C4::Koha;
use C4::Context;

2
admin/matching-rules.pl

@ -21,7 +21,7 @@
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Auth;
use C4::Context;
use C4::Output;

2
admin/oai_set_mappings.pl

@ -32,7 +32,7 @@ the OR operator will be applied.
use Modern::Perl;
use CGI;
use CGI qw ( -utf8 );
use C4::Auth;
use C4::Output;
use C4::OAI::Sets;

2
admin/oai_sets.pl

@ -28,7 +28,7 @@ Admin page to describe OAI SETs
use Modern::Perl;
use CGI;
use CGI qw ( -utf8 );
use C4::Auth;
use C4::Output;
use C4::OAI::Sets;

2
admin/patron-attr-types.pl

@ -21,7 +21,7 @@
use Modern::Perl;
use CGI;
use CGI qw ( -utf8 );
use List::MoreUtils qw/uniq/;
use C4::Auth;

2
admin/preferences.pl

@ -19,7 +19,7 @@
use Modern::Perl;
use CGI;
use CGI qw ( -utf8 );
use Encode;
use C4::Auth;
use C4::Context;

2
admin/printers.pl

@ -39,7 +39,7 @@
use strict;
#use warnings; FIXME - Bug 2505
use CGI;
use CGI qw ( -utf8 );
use C4::Context;
use C4::Output;
use C4::Auth;

2
admin/smart-rules.pl

@ -19,7 +19,7 @@
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Context;
use C4::Output;
use C4::Auth;

2
admin/stopwords.pl

@ -23,7 +23,7 @@
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Context;
use C4::Output;
use C4::Auth;

2
admin/systempreferences.pl

@ -43,7 +43,7 @@ ALSO :
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use MIME::Base64;
use C4::Auth;
use C4::Context;

2
admin/transport-cost-matrix.pl

@ -19,7 +19,7 @@
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Context;
use C4::Output;
use C4::Auth;

2
admin/z3950servers.pl

@ -25,7 +25,7 @@
# delete_confirmed deletes a record and goes to list view.
use Modern::Perl;
use CGI;
use CGI qw ( -utf8 );
use C4::Context;
use C4::Auth;
use C4::Output;

2
authorities/auth_finder.pl

@ -21,7 +21,7 @@
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Output;
use C4::Auth;
use C4::Context;

2
authorities/authorities-home.pl

@ -20,7 +20,7 @@
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use URI::Escape;
use C4::Auth;

2
authorities/authorities.pl

@ -20,7 +20,7 @@
use strict;
use warnings;
use CGI;
use CGI qw ( -utf8 );
use C4::Auth;
use C4::Output;
use C4::AuthoritiesMarc;

2
authorities/blinddetail-biblio-search.pl

@ -43,7 +43,7 @@ use C4::AuthoritiesMarc;
use C4::Auth;
use C4::Context;
use C4::Output;
use CGI;
use CGI qw ( -utf8 );
use MARC::Record;
use C4::Koha;

2
authorities/detail-biblio-search.pl

@ -44,7 +44,7 @@ use C4::AuthoritiesMarc;
use C4::Auth;
use C4::Context;
use C4::Output;
use CGI;
use CGI qw ( -utf8 );
use MARC::Record;
use C4::Koha;
# use C4::Biblio;

2
authorities/detail.pl

@ -44,7 +44,7 @@ use C4::AuthoritiesMarc;
use C4::Auth;
use C4::Context;
use C4::Output;
use CGI;
use CGI qw ( -utf8 );
use MARC::Record;
use C4::Koha;

2
authorities/export.pl

@ -6,7 +6,7 @@ use C4::Record;
use C4::Auth;
use C4::Output;
use C4::AuthoritiesMarc;
use CGI;
use CGI qw ( -utf8 );
my $query = new CGI;
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(

Some files were not shown because too many files changed in this diff

Loading…
Cancel
Save