Parent Directory | Revision Log
require view classes on startup
1 | dpavlin | 21 | package Frey::View; |
2 | dpavlin | 2 | |
3 | use strict; | ||
4 | use warnings; | ||
5 | |||
6 | use Template::Declare::Tags; # defaults to 'HTML' | ||
7 | use base 'Template::Declare'; | ||
8 | use Data::Dump qw/dump/; | ||
9 | |||
10 | dpavlin | 19 | template status => sub { |
11 | my ( $self ) = @_; | ||
12 | p { 'Welcome to Frey' } | ||
13 | h1 { 'Available templates' } | ||
14 | dpavlin | 10 | pre { |
15 | dpavlin | 19 | { class is 'debug' } |
16 | outs dump( Template::Declare->templates ) | ||
17 | dpavlin | 2 | } |
18 | }; | ||
19 | |||
20 | 1; |
ViewVC Help | |
Powered by ViewVC 1.1.26 |