[Templates-cvs] cvs commit: TT3/t base.t

cvs@template-toolkit.org cvs@template-toolkit.org
Thu, 04 Dec 2003 11:22:59 +0000


cvs         03/12/04 11:22:59

  Modified:    t        base.t
  Log:
  * changed Template::Toolkit to Template::TT3
  
  Revision  Changes    Path
  1.3       +8 -8      TT3/t/base.t
  
  Index: base.t
  ===================================================================
  RCS file: /template-toolkit/TT3/t/base.t,v
  retrieving revision 1.2
  retrieving revision 1.3
  diff -u -r1.2 -r1.3
  --- base.t	2003/12/03 18:27:29	1.2
  +++ base.t	2003/12/04 11:22:59	1.3
  @@ -2,14 +2,14 @@
   #
   # t/base.t
   #
  -# Test the Template::Toolkit::Base.pm module.
  +# Test the Template::TT3::Base.pm module.
   #
   # Written by Andy Wardley <abw@wardley.org>
   #
   # This is free software; you can redistribute it and/or modify it
   # under the same terms as Perl itself.
   #
  -# $Id: base.t,v 1.2 2003/12/03 18:27:29 abw Exp $
  +# $Id: base.t,v 1.3 2003/12/04 11:22:59 abw Exp $
   #
   #========================================================================
   
  @@ -17,10 +17,10 @@
   use warnings;
   
   use lib qw( ./lib ../lib );
  -use Template::Toolkit::Base;
  +use Template::TT3::Base;
   use Test::More tests => 44;
   
  -$Template::Toolkit::Base::DEBUG = grep(/^--?d(ebug)?/, @ARGV);
  +$Template::TT3::Base::DEBUG = grep(/^--?d(ebug)?/, @ARGV);
   
   my ($pkg, $obj);
   
  @@ -30,7 +30,7 @@
   #------------------------------------------------------------------------
   
   # instantiate a base class object and test error reporting/returning
  -$pkg = 'Template::Toolkit::Base';
  +$pkg = 'Template::TT3::Base';
   $obj = $pkg->new() || die $pkg->error();
   ok( $obj, 'created a base class object' );
   
  @@ -87,7 +87,7 @@
   #------------------------------------------------------------------------
   
   package Template::Test::Warning;
  -use base qw( Template::Toolkit::Base );
  +use base qw( Template::TT3::Base );
   use vars qw( $WARNING );
   
   package main;
  @@ -116,7 +116,7 @@
   #------------------------------------------------------------------------
   
   package Template::Test::Fail;
  -use base qw( Template::Toolkit::Base );
  +use base qw( Template::TT3::Base );
   use vars qw( $ERROR $WARNING );
   
   sub init {
  @@ -139,7 +139,7 @@
   #------------------------------------------------------------------------
   
   package Template::Test::Name;
  -use base qw( Template::Toolkit::Base );
  +use base qw( Template::TT3::Base );
   use vars qw( $ERROR );
   
   sub init {