/[Frey]/trunk/lib/Frey/View.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/lib/Frey/View.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

trunk/lib/View.pm revision 2 by dpavlin, Sat Jun 28 11:49:35 2008 UTC trunk/lib/Frey/View.pm revision 21 by dpavlin, Sun Jun 29 13:12:59 2008 UTC
# Line 1  Line 1 
1  package View;  package Frey::View;
2    
3  use strict;  use strict;
4  use warnings;  use warnings;
5    
6  use Template::Declare::Tags; # defaults to 'HTML'  use Template::Declare::Tags; # defaults to 'HTML'
7  use base 'Template::Declare';  use base 'Template::Declare';
   
8  use Data::Dump qw/dump/;  use Data::Dump qw/dump/;
9    
10  use Strix::User;  template status => sub {
11  my $user = Strix::User->new( nick => 'dpavlin' );          my ( $self ) = @_;
12            p { 'Welcome to Frey' }
13  template user => sub {          h1 { 'Available templates' }
14          html {          pre {
15                  head {}                  { class is 'debug' }
16                  body {                  outs dump( Template::Declare->templates )
                         p {'Hello, world wide web!'}  
                         pre {  
                                 outs dump( $user );  
                         }  
                 }  
17          }          }
18  };  };
19    
Legend:
Removed from v.2  
changed lines
  Added in v.21
  ViewVC Help
Powered by ViewVC 1.1.26