[Templates-cvs] cvs commit: TT3/lib/Template/TT3 Directives.pm

cvs@template-toolkit.org cvs@template-toolkit.org
Wed, 01 Dec 2004 11:11:27 +0000


cvs         04/12/01 11:11:27

  Added:       lib/Template/TT3 Directives.pm
  Log:
  * added new Template::TT3::* modules
  
  Revision  Changes    Path
  1.1                  TT3/lib/Template/TT3/Directives.pm
  
  Index: Directives.pm
  ===================================================================
  #========================================================================
  #
  # Template::TT3::Directives
  #
  # DESCRIPTION
  #   Default collection of directives for TT3.
  # 
  # AUTHOR
  #   Andy Wardley <abw@wardley.org>
  #
  # COPYRIGHT
  #   Copyright (C) 1996-2004 Andy Wardley.  All Rights Reserved.
  #
  #   This module is free software; you can redistribute it and/or
  #   modify it under the same terms as Perl itself.
  #
  # REVISION
  #   $Id: Directives.pm,v 1.1 2004/12/01 11:11:26 abw Exp $
  #
  #========================================================================
  
  package Template::TT3::Directives;
  
  use strict;
  use warnings;
  use Template::Directives;
  use base qw( Template::Directives );
  
  our $VERSION = sprintf("%d.%02d", q$Revision: 1.1 $ =~ /(\d+)\.(\d+)/);
  our $DEBUG   = 0 unless defined $DEBUG;
  our $ERROR   = '';
  our $MODULES = {
      BLOCK       => 'Template::Directive::Block',
      CASE        => 'Template::Directive::Case',
      ELSE        => 'Template::Directive::Else',
      ELSIF       => 'Template::Directive::Elsif',
      END         => 'Template::Directive::End',
      GET         => 'Template::Directive::Get',
      IF          => 'Template::Directive::If',
      INCLUDE     => 'Template::Directive::Include',
      INTERPOLATE => 'Template::Directive::Interpolate',
      MACRO       => 'Template::Directive::Macro',
      MY          => 'Template::Directive::My',
      PROCESS     => 'Template::Directive::Process',
      SET         => 'Template::Directive::Set',
      SWITCH      => 'Template::Directive::Switch',
      TAGS        => 'Template::Directive::Tags',
      UNLESS      => 'Template::Directive::Unless',
      WRAPPER     => 'Template::Directive::Wrapper',
  } unless defined $MODULES;
  
  
  1;
  
  __END__
  
  =head1 NAME
  
  Template::TT3::Directives - default set of directives for TT3
  
  =head1 SYNOPSIS
  
      # TODO
  
  =head1 DESCRIPTION
  
      # TODO
  
  =head1 METHODS
  
      # TODO
  
  =head1 AUTHOR
  
  Andy Wardley  E<lt>abw@wardley.orgE<gt>
  
  =head1 VERSION
  
  $Revision: 1.1 $
  
  =head1 COPYRIGHT
  
  Copyright (C) 1996-2004 Andy Wardley.  All Rights Reserved.
  
  This module is free software; you can redistribute it and/or
  modify it under the same terms as Perl itself.
  
  =cut
  
  # Local Variables:
  # mode: perl
  # perl-indent-level: 4
  # indent-tabs-mode: nil
  # End:
  #
  # vim: expandtab shiftwidth=4: