[Templates-cvs] cvs commit: TT3/lib/Template Compilers.pm
cvs@template-toolkit.org
cvs@template-toolkit.org
Sun, 12 Dec 2004 10:28:18 +0000
cvs 04/12/12 10:28:18
Modified: lib/Template Compilers.pm
Log:
* added $DEFAULT package var
Revision Changes Path
1.5 +5 -9 TT3/lib/Template/Compilers.pm
Index: Compilers.pm
===================================================================
RCS file: /template-toolkit/TT3/lib/Template/Compilers.pm,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -r1.4 -r1.5
--- Compilers.pm 2004/12/10 13:41:24 1.4
+++ Compilers.pm 2004/12/12 10:28:18 1.5
@@ -15,7 +15,7 @@
# modify it under the same terms as Perl itself.
#
# REVISION
-# $Id: Compilers.pm,v 1.4 2004/12/10 13:41:24 abw Exp $
+# $Id: Compilers.pm,v 1.5 2004/12/12 10:28:18 abw Exp $
#
#========================================================================
@@ -26,20 +26,19 @@
use Template::Factory::Singletons;
use base qw( Template::Factory::Singletons );
-our $VERSION = sprintf("%d.%02d", q$Revision: 1.4 $ =~ /(\d+)\.(\d+)/);
+our $VERSION = sprintf("%d.%02d", q$Revision: 1.5 $ =~ /(\d+)\.(\d+)/);
our $DEBUG = 0 unless defined $DEBUG;
our $ERROR = '';
our $THROW = 'compiler';
our $NAME = 'compilers';
our $PATH = 'Template::Compiler' unless defined $PATH;
-our $LOADED = { } unless defined $LOADED;
+our $LOADED = { } unless defined $LOADED;
+our $DEFAULT = 'tt3' unless defined $DEFAULT;
our $MODULES = {
tt2 => 'Template::TT2::Compiler',
tt3 => 'Template::TT3::Compiler',
- default => 'Template::TT3::Compiler',
};
-
# define $COMPILERS, compiler() and compilers() as aliases
# to $MODULES, module() and modules()
our $COMPILERS = $MODULES;
@@ -47,9 +46,6 @@
*compilers = __PACKAGE__->can('objects');
-# TODO: handle default, and map to real name so arguments like
-# tt3_option still work
-
1;
__END__
@@ -147,7 +143,7 @@
=head1 VERSION
-$Revision: 1.4 $
+$Revision: 1.5 $
=head1 COPYRIGHT