File Coverage

blib/lib/HTML/Template/Pro/Extension/ObjBase.pm

Criterion	Covered	Total	%
statement	25	26	96.1
branch			n/a
condition			n/a
subroutine	8	9	88.8
pod	0	5	0.0
total	33	40	82.5

package HTML::Template::Pro::Extension::ObjBase;

$VERSION 			= "0.11";
sub Version 		{ $VERSION; }

use Carp;
use strict;

sub new {
               my $class = shift;
               my $self = {};
               bless $self, $class;
               return $self;
}


sub init {
  my $self = shift;
	my $parent = shift;
}

sub get_filter {
  my $self = shift;
	my $parent = shift;
  return $self->_get_filter();
}

sub _get_filter {
	my $self = shift;
	my @ret ;
	no strict "refs";
	push @ret, \&{ref($self) . '::filter'};
	return @ret;
}

sub filter {
	my $template = shift;
	return $$template;
}

1;

# vim: set ts=2: