Context.pm - BEGIN block VERSION and vars related to export.

Signed-off-by: Chris Cormack <crc@liblime.com>
Signed-off-by: Joshua Ferraro <jmf@liblime.com>
This commit is contained in:
Joe Atzberger 2008-01-07 13:52:53 -06:00 committed by Joshua Ferraro
parent d2a2f31027
commit b2e8eb4a7c
1 changed files with 2 additions and 5 deletions

View File

@ -17,6 +17,7 @@ package C4::Context;
# Suite 330, Boston, MA 02111-1307 USA
use strict;
use vars qw($VERSION $AUTOLOAD $context @context_stack);
BEGIN {
if ($ENV{'HTTP_USER_AGENT'}) {
@ -51,18 +52,14 @@ BEGIN {
}
CGI::Carp->set_message(\&handle_errors);
} # else there is no browser to send fatals to!
$VERSION = '3.00.00.036';
}
use DBI;
use ZOOM;
use XML::Simple;
use C4::Boolean;
use vars qw($VERSION $AUTOLOAD $context @context_stack);
$VERSION = '3.00.00.036';
=head1 NAME
C4::Context - Maintain and manipulate the context of a Koha script