File Coverage

blib/lib/HTML/Template/Compiled/Lazy.pm

Criterion	Covered	Total	%
statement	16	28	57.1
branch	1	6	16.6
condition			n/a
subroutine	5	8	62.5
pod	3	5	60.0
total	25	47	53.1

package HTML::Template::Compiled::Lazy;
use strict;
use warnings;
our $VERSION = '1.002_001'; # TRIAL VERSION

use base 'HTML::Template::Compiled';

sub from_scratch {
    my ($self) = @_;
    # dummy method. wait until real compilation until output().
    return $self;
}

sub compile_early { 0 }

sub query {
    my ( $self, @args ) = @_;
    my $perl = $self->get_perl;
    unless ($perl) {
        $self = $self->SUPER::from_scratch();
    }
    $self->SUPER::query(@args);
}

sub output {
    my ( $self, @args ) = @_;
    my $perl = $self->get_perl;
    unless ($perl) {
        $self = $self->SUPER::from_scratch();
    }
    $self->SUPER::output(@args);
}

sub get_code {
    my ($self) = @_;
    my $perl = $self->get_perl;
    unless ($perl) {
        $self = $self->SUPER::from_scratch;
        $perl = $self->get_perl;
    }
    return $perl;
}

1;

__END__