Bug 2505 - Add commented use warnings where missing in *.pm

This commit is contained in:
Donovan Jones 2010-04-19 11:52:29 +12:00 committed by Chris Cormack
parent f394170ebc
commit 593a7d8e6a
48 changed files with 52 additions and 7 deletions

View File

@ -19,6 +19,7 @@ package C4::Accounts;
use strict;
#use warnings; FIXME - Bug 2505
use C4::Context;
use C4::Stats;
use C4::Members;

View File

@ -18,6 +18,7 @@ package C4::Auth;
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
#use warnings; FIXME - Bug 2505
use Digest::MD5 qw(md5_base64);
use Storable qw(thaw freeze);
use URI::Escape;

View File

@ -18,6 +18,7 @@ package C4::Auth_with_cas;
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
#use warnings; FIXME - Bug 2505
use C4::Debug;
use C4::Context;

View File

@ -18,7 +18,7 @@ package C4::Auth_with_ldap;
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
# use warnings; almost?
#use warnings; FIXME - Bug 2505
use Digest::MD5 qw(md5_base64);
use C4::Debug;

View File

@ -17,6 +17,7 @@ package C4::AuthoritiesMarc;
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
#use warnings; FIXME - Bug 2505
use C4::Context;
use C4::Koha;
use MARC::Record;

View File

@ -18,6 +18,7 @@ package C4::AuthoritiesMarc::MARC21;
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
#use warnings; FIXME - Bug 2505
use MARC::Record;
our $VERSION = 3.00;

View File

@ -18,6 +18,7 @@ package C4::AuthoritiesMarc::UNIMARC;
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
#use warnings; FIXME - Bug 2505
our $VERSION = 3.00;
=head1 NAME

View File

@ -19,6 +19,7 @@ package C4::BackgroundJob;
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
#use warnings; FIXME - Bug 2505
use C4::Context;
use C4::Auth qw/get_session/;
use Digest::MD5;

View File

@ -16,6 +16,7 @@ package C4::Barcodes::PrinterConfig;
# Suite 330, Boston, MA 02111-1307 USA
use strict;
#use warnings; FIXME - Bug 2505
use vars qw($VERSION @EXPORT);
use PDF::API2;

View File

@ -18,6 +18,7 @@ package C4::Bookseller;
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
#use warnings; FIXME - Bug 2505
use vars qw($VERSION @ISA @EXPORT);

View File

@ -17,6 +17,7 @@ package C4::Branch;
use strict;
#use warnings; FIXME - Bug 2505
require Exporter;
use C4::Context;
use C4::Koha;

View File

@ -18,6 +18,7 @@ package C4::Budgets;
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
#use warnings; FIXME - Bug 2505
use C4::Context;
use C4::Dates qw(format_date format_date_in_iso);
use C4::SQLHelper qw<:all>;

View File

@ -19,7 +19,7 @@ package C4::Circulation;
use strict;
#use warnings; # soon!
#use warnings; FIXME - Bug 2505
use C4::Context;
use C4::Stats;
use C4::Reserves;

View File

@ -18,6 +18,7 @@ package C4::Contract;
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
#use warnings; FIXME - Bug 2505
use C4::SQLHelper qw(:all);
use vars qw($VERSION @ISA @EXPORT);

View File

@ -19,6 +19,9 @@ package C4::Csv;
#
#
#use strict;
#use warnings; FIXME - Bug 2505
use C4::Context;
use vars qw($VERSION @ISA @EXPORT);

View File

@ -18,6 +18,7 @@ package C4::Heading;
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
#use warnings; FIXME - Bug 2505
use MARC::Record;
use MARC::Field;
use C4::Context;

View File

@ -18,6 +18,7 @@ package C4::Heading::MARC21;
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
#use warnings; FIXME - Bug 2505
use MARC::Record;
use MARC::Field;

View File

@ -18,6 +18,7 @@ package C4::Installer;
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
#use warnings; FIXME - Bug 2505
our $VERSION = 3.00;
use C4::Context;

View File

@ -18,6 +18,7 @@ package C4::Items;
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
#use warnings; FIXME - Bug 2505
use Carp;
use C4::Context;

View File

@ -19,6 +19,7 @@ package C4::Koha;
use strict;
#use warnings; FIXME - Bug 2505
use C4::Context;
use C4::Output;
use URI::Split qw(uri_split);

View File

@ -20,7 +20,7 @@ package C4::Languages;
use strict;
#use warnings; #FIXME: turn off warnings before release
#use warnings; FIXME - Bug 2505
use Carp;
use C4::Context;
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS $DEBUG);

View File

@ -21,6 +21,7 @@ package C4::Maintainance; #assumes C4/Maintainance
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
#use warnings; FIXME - Bug 2505
use C4::Context;
require Exporter;

View File

@ -19,6 +19,7 @@ package C4::Members;
use strict;
#use warnings; FIXME - Bug 2505
use C4::Context;
use C4::Dates qw(format_date_in_iso);
use Digest::MD5 qw(md5_base64);

View File

@ -18,6 +18,7 @@ package C4::Members::AttributeTypes;
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
#use warnings; FIXME - Bug 2505
use C4::Context;
use vars qw($VERSION);

View File

@ -26,6 +26,7 @@ package C4::Output;
# templates.
use strict;
#use warnings; FIXME - Bug 2505
use C4::Context;
use C4::Languages qw(getTranslatedLanguages get_bidi regex_lang_subtags language_get_description accept_language );

View File

@ -19,6 +19,7 @@ package C4::Overdues;
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
#use warnings; FIXME - Bug 2505
use Date::Calc qw/Today Date_to_Days/;
use Date::Manip qw/UnixDate/;
use C4::Circulation;

View File

@ -18,6 +18,7 @@ package C4::Print;
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
#use warnings; FIXME - Bug 2505
use C4::Context;
use C4::Circulation;
use C4::Members;

View File

@ -19,7 +19,8 @@ package C4::Record;
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
#
use strict;# use warnings; #FIXME: turn off warnings before release
use strict;
#use warnings; FIXME - Bug 2505
# please specify in which methods a given module is used
use MARC::Record; # marc2marcxml, marcxml2marc, html2marc, changeEncoding

View File

@ -18,6 +18,7 @@ package C4::Reports;
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
#use warnings; FIXME - Bug 2505
use CGI;
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);

View File

@ -18,7 +18,7 @@ package C4::Reports::Guided;
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
# use warnings; # FIXME: this module needs a lot of repair to run clean under warnings
#use warnings; FIXME - Bug 2505 this module needs a lot of repair to run clean under warnings
use CGI;
use Carp;

View File

@ -21,7 +21,7 @@ package C4::Reserves;
use strict;
# use warnings; # FIXME: someday
#use warnings; FIXME - Bug 2505
use C4::Context;
use C4::Biblio;
use C4::Members;

View File

@ -57,6 +57,8 @@ package C4::Ris;
#
#
#use strict;
#use warnings; FIXME - Bug 2505
use vars qw($VERSION @ISA @EXPORT);

View File

@ -23,6 +23,7 @@ package C4::RotatingCollections;
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
#use warnings; FIXME - Bug 2505
require Exporter;

View File

@ -18,6 +18,7 @@ package C4::Scheduler;
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
#use warnings; FIXME - Bug 2505
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
use C4::Context;

View File

@ -16,7 +16,7 @@ package C4::Search;
# Suite 330, Boston, MA 02111-1307 USA
use strict;
# use warnings; # FIXME
#use warnings; FIXME - Bug 2505
require Exporter;
use C4::Context;
use C4::Biblio; # GetMarcFromKohaField, GetBiblioData

View File

@ -18,6 +18,7 @@ package C4::Search::PazPar2;
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
#use warnings; FIXME - Bug 2505
use LWP::UserAgent;
use URI;

View File

@ -18,6 +18,7 @@ package C4::Frequency;
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
#use warnings; FIXME - Bug 2505
use C4::Context;
use C4::SQLHelper qw<:all>;
use C4::Debug;

View File

@ -18,6 +18,7 @@ package C4::Numberpattern;
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
#use warnings; FIXME - Bug 2505
use C4::Context;
use C4::SQLHelper qw<:all>;
use C4::Debug;

View File

@ -19,6 +19,7 @@ package C4::Suggestions;
use strict;
#use warnings; FIXME - Bug 2505
use CGI;
use C4::Context;

View File

@ -19,6 +19,7 @@ package C4::UploadedFile;
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
#use warnings; FIXME - Bug 2505
use C4::Context;
use C4::Auth qw/get_session/;
use IO::File;

View File

@ -27,6 +27,7 @@ use LWP::UserAgent;
use HTTP::Request::Common;
use strict;
#use warnings; FIXME - Bug 2505
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
BEGIN {

View File

@ -25,6 +25,7 @@ package C4::Z3950;
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
#use warnings; FIXME - Bug 2505
# standard or CPAN modules used
use DBI;

View File

@ -18,6 +18,7 @@ package install_misc::UpgradeBackup;
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
#use warnings; FIXME - Bug 2505
use File::Compare qw(compare);
use Cwd qw(cwd);
use File::Copy;

View File

@ -21,6 +21,7 @@ package InstallAuth;
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
#use warnings; FIXME - Bug 2505
use Digest::MD5 qw(md5_base64);
require Exporter;

View File

@ -1,6 +1,7 @@
package TmplToken;
use strict;
#use warnings; FIXME - Bug 2505
use TmplTokenType;
require Exporter;

View File

@ -1,6 +1,7 @@
package TmplTokenType;
use strict;
#use warnings; FIXME - Bug 2505
require Exporter;
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);

View File

@ -1,6 +1,7 @@
package TmplTokenizer;
use strict;
#use warnings; FIXME - Bug 2505
use TmplTokenType;
use TmplToken;
use VerboseWarnings qw( pedantic_p error_normal warn_normal warn_pedantic );

View File

@ -1,6 +1,7 @@
package VerboseWarnings;
use strict;
#use warnings; FIXME - Bug 2505
require Exporter;
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);