Permalink
Browse files

Add Koha.pm and include it universally

At this point all we're doing is turning on warnings, strict,
and 5.10 features by default in all files. This also defines
a $Koha::VERSION variable which is going to be the basis for
the code revision number, as opposed to $C4::Context::VERSION,
which is the data config version number.
  • Loading branch information...
1 parent b26dd7e commit 3607caae8becb83a850854c2be484451543bcc0b @ctfliblime ctfliblime committed Jun 9, 2011
Showing 443 changed files with 469 additions and 0 deletions.
View
@@ -19,6 +19,7 @@ package C4::Accounts;
use strict;
+use Koha;
use C4::Context;
use C4::Stats;
use C4::Members;
View
@@ -19,6 +19,7 @@ package C4::Acquisition;
use strict;
+use Koha;
use C4::Context;
use C4::Debug;
use C4::Dates qw(format_date);
View
@@ -25,6 +25,7 @@ use Digest::MD5 qw(md5_base64);
use CGI::Session;
require Exporter;
+use Koha;
use C4::Context;
use C4::Output; # to get the template
use C4::Members;
@@ -22,6 +22,7 @@ use strict;
use Digest::MD5 qw(md5_base64);
use C4::Debug;
+use Koha;
use C4::Context;
use C4::Members qw(AddMember changepassword);
use C4::Utils qw( :all );
@@ -17,6 +17,7 @@ package C4::AuthoritiesMarc;
# Suite 330, Boston, MA 02111-1307 USA
use strict;
+use Koha;
use C4::Context;
use C4::Koha;
use MARC::Record;
View
@@ -19,6 +19,7 @@ package C4::BackgroundJob;
# Suite 330, Boston, MA 02111-1307 USA
use strict;
+use Koha;
use C4::Context;
use C4::Auth qw/get_session/;
use Digest::MD5;
View
@@ -22,6 +22,7 @@ use warnings;
use Carp;
+use Koha;
use C4::Context;
use C4::Debug;
use C4::Dates;
@@ -22,6 +22,7 @@ use warnings;
use Carp;
+use Koha;
use C4::Context;
use C4::Debug;
use C4::Dates;
@@ -22,6 +22,7 @@ use warnings;
use Carp;
+use Koha;
use C4::Context;
use C4::Debug;
use C4::Dates;
@@ -22,6 +22,7 @@ use warnings;
use Carp;
+use Koha;
use C4::Context;
use C4::Debug;
use C4::Dates;
View
@@ -25,6 +25,7 @@ use CHI;
require Exporter;
+use Koha;
use C4::Context;
use C4::Koha;
View
@@ -22,6 +22,7 @@ use vars qw($VERSION @EXPORT);
use Carp;
use Date::Calc qw( Date_to_Days );
+use Koha;
use C4::Context;
BEGIN {
View
@@ -17,6 +17,7 @@ package C4::Category;
use strict;
use warnings;
+use Koha;
use C4::Context;
our $AUTOLOAD;
View
@@ -22,6 +22,7 @@ use strict;
use warnings;
use Carp;
+use Koha;
use C4::Context;
use C4::Stats;
use C4::Reserves;
@@ -22,6 +22,7 @@ use warnings;
require Exporter;
use Class::Factory::Util;
+use Koha;
use C4::Context;
use C4::Koha;
View
@@ -21,6 +21,7 @@ use strict;
use warnings;
require Exporter;
+use Koha;
use C4::Context;
use C4::Koha;
use C4::ClassSortRoutine;
@@ -27,6 +27,7 @@ use strict;
require Exporter;
+use Koha;
use C4::Context;
use vars qw($VERSION @ISA @EXPORT);
View
@@ -17,6 +17,7 @@ package C4::Courses;
use strict;
use warnings;
+use Koha;
use C4::Context;
use C4::Members;
use C4::Koha;
@@ -5,6 +5,7 @@ use warnings;
use autouse 'Data::Dumper' => qw(Dumper);
+use Koha;
use C4::Context;
use C4::Debug;
use C4::Creators::PDF;
View
@@ -20,6 +20,7 @@ package C4::Crud;
use strict;
use warnings;
+use Koha;
use C4::Context;
use C4::Koha;
use C4::Debug;
View
@@ -22,6 +22,7 @@ package C4::Csv;
#use strict;
#use warnings; FIXME - Bug 2505
+use Koha;
use C4::Context;
use vars qw($VERSION @ISA @EXPORT);
View
@@ -17,6 +17,7 @@ package C4::Dates;
use strict;
use warnings;
use Carp;
+use Koha;
use C4::Context;
use C4::Debug;
use Exporter;
@@ -21,6 +21,7 @@ use XML::Simple;
use LWP::Simple;
# use LWP::UserAgent;
use HTTP::Request::Common;
+use Koha;
use C4::Context;
use C4::Debug;
View
@@ -21,6 +21,7 @@ use strict;
use warnings;
use CGI;
+use Koha;
use C4::Context;
use C4::Debug;
use C4::Dates;
@@ -21,6 +21,7 @@ use strict;
use warnings;
use CGI;
+use Koha;
use C4::Context;
use C4::Members::Messaging;
use C4::Debug;
View
@@ -20,6 +20,7 @@ package C4::Heading;
use strict;
use MARC::Record;
use MARC::Field;
+use Koha;
use C4::Context;
use C4::Heading::MARC21;
use C4::Search;
@@ -27,6 +27,7 @@ use C4::Branch;
use C4::Accounts;
use C4::Biblio;
use C4::Reserves;
+use Koha;
use C4::Context;
use C4::AuthoritiesMarc;
use C4::ILSDI::Utility;
View
@@ -25,6 +25,7 @@ use C4::Items;
use C4::Circulation;
use C4::Biblio;
use C4::Reserves;
+use Koha;
use C4::Context;
use C4::Branch qw/GetBranchName/;
use Digest::MD5 qw(md5_base64);
View
@@ -20,6 +20,7 @@ package C4::ImportBatch;
use strict;
use warnings;
+use Koha;
use C4::Context;
use C4::Koha;
use C4::Dates;
View
@@ -22,6 +22,7 @@ use strict;
use warnings;
require Exporter;
+use Koha;
use C4::Context;
use CGI;
View
@@ -20,6 +20,7 @@ package C4::Installer;
use strict;
our $VERSION = 3.00;
+use Koha;
use C4::Context;
=head1 NAME
@@ -17,6 +17,7 @@ package C4::ItemCirculationAlertPreference;
use strict;
use warnings;
+use Koha;
use C4::Context;
use C4::Category;
use C4::ItemType;
@@ -21,6 +21,7 @@ use strict;
use warnings;
use Carp;
+use Koha;
use C4::Context;
use C4::Items;
View
@@ -17,6 +17,7 @@ package C4::ItemType;
use strict;
use warnings;
+use Koha;
use C4::Context;
our $AUTOLOAD;
View
@@ -21,6 +21,7 @@ use strict;
use warnings;
use Carp;
+use Koha;
use C4::Context;
use C4::Koha;
use C4::Biblio;
View
@@ -19,6 +19,7 @@ package C4::Koha;
use warnings;
use strict;
+use Koha;
use C4::Context;
use C4::Output;
use Storable;
View
@@ -3,6 +3,7 @@ package C4::Labels::Batch;
use strict;
use warnings;
+use Koha;
use C4::Context;
use C4::Debug;
View
@@ -8,6 +8,7 @@ use Algorithm::CheckDigits;
use Text::CSV_XS;
use Data::Dumper;
+use Koha;
use C4::Context;
use C4::Debug;
use C4::Biblio;
View
@@ -3,6 +3,7 @@ package C4::Labels::Layout;
use strict;
use warnings;
+use Koha;
use C4::Context;
use C4::Debug;
use C4::Labels::PDF;
View
@@ -22,6 +22,7 @@ use warnings;
use Data::Dumper;
+use Koha;
use C4::Context;
use C4::Debug;
@@ -3,6 +3,7 @@ package C4::Labels::Profile;
use strict;
use warnings;
+use Koha;
use C4::Context;
use C4::Debug;
use C4::Labels::Lib 1.000000 qw(get_unit_values);
@@ -5,6 +5,7 @@ use warnings;
use PDF::Reuse;
use POSIX qw(ceil);
+use Koha;
use C4::Context;
use C4::Debug;
use C4::Labels::Profile 1.000000;
View
@@ -22,6 +22,7 @@ package C4::Languages;
use strict;
use warnings;
use Carp;
+use Koha;
use C4::Context;
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS $DEBUG);
View
@@ -23,6 +23,7 @@ package C4::Log;
use strict;
use warnings;
+use Koha;
use C4::Context;
use C4::Dates qw(format_date);
View
@@ -17,6 +17,7 @@ package C4::LostItems;
use strict;
use warnings;
+use Koha;
use C4::Context;
use C4::Items;
View
@@ -21,6 +21,7 @@ package C4::Maintainance; #assumes C4/Maintainance
# Suite 330, Boston, MA 02111-1307 USA
use strict;
+use Koha;
use C4::Context;
require Exporter;
View
@@ -20,6 +20,7 @@ package C4::Matcher;
use strict;
use warnings;
+use Koha;
use C4::Context;
use MARC::Record;
use MARC::File::XML;
View
@@ -23,6 +23,7 @@ use warnings;
use Carp qw(carp cluck croak confess);
+use Koha;
use C4::Context;
use C4::Dates qw(format_date_in_iso);
use Digest::MD5 qw(md5_base64);
@@ -18,6 +18,7 @@ package C4::Members::AttributeTypes;
# Suite 330, Boston, MA 02111-1307 USA
use strict;
+use Koha;
use C4::Context;
use vars qw($VERSION);
@@ -21,6 +21,7 @@ use strict;
use warnings;
use Text::CSV; # Don't be tempted to use Text::CSV::Unicode -- even in binary mode it fails.
+use Koha;
use C4::Context;
use C4::Members::AttributeTypes;
Oops, something went wrong.

0 comments on commit 3607caa

Please sign in to comment.