use strict;
-#use warnings; FIXME - Bug 2505
+use warnings;
use C4::TmplTokenType;
-require Exporter;
-
-use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
-
-###############################################################################
=head1 NAME
=cut
-###############################################################################
+our $VERSION = 3.07.00.049;
-$VERSION = 0.01;
-
-@ISA = qw(Exporter);
-@EXPORT_OK = qw();
-
-###############################################################################
sub new {
my $this = shift;