File Coverage

blib/lib/Gantry/Template/Default.pm
Criterion Covered Total %
statement 3 9 33.3
branch n/a
condition n/a
subroutine 1 5 20.0
pod 4 4 100.0
total 8 18 44.4


line stmt bran cond sub pod time code
1             package Gantry::Template::Default;
2             require Exporter;
3              
4 3     3   710 use vars qw( @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS );
  3         5  
  3         690  
5              
6             ############################################################
7             # Variables #
8             ############################################################
9             @ISA = qw( Exporter );
10             @EXPORT = qw(
11             do_action
12             do_error
13             do_process
14             template_engine
15             );
16              
17             @EXPORT_OK = qw( );
18              
19             ############################################################
20             # Functions #
21             ############################################################
22             #-------------------------------------------------
23             # $site->do_action( 'do_main|do_edit', @p )
24             #-------------------------------------------------
25             sub do_action {
26 0     0 1   my( $site, $action, @p ) = @_;
27            
28 0           $site->stash->controller->data( $site->$action( @p ) );
29             }
30              
31             #-------------------------------------------------
32             # $site->do_error( @err )
33             #-------------------------------------------------
34             sub do_error {
35 0     0 1   my( $site, @err ) = @_;
36            
37             #$$site{r}->log_error( $msg );
38              
39             }
40              
41             #-------------------------------------------------
42             # $site->do_process( )
43             #-------------------------------------------------
44             sub do_process {
45 0     0 1   my( $site ) = @_;
46            
47 0           return( $site->stash->controller->data );
48              
49             } # end do_process
50              
51             #-------------------------------------------------
52             # $site->template_engine
53             #-------------------------------------------------
54             sub template_engine {
55 0     0 1   return __PACKAGE__;
56            
57             } # end template_engine
58              
59             # EOF
60             1;
61              
62             __END__