/[Frey]/trunk/lib/Frey/Web.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/Web.pm

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

revision 156 by dpavlin, Thu Jul 17 17:55:39 2008 UTC revision 160 by dpavlin, Thu Jul 17 19:11:01 2008 UTC
# Line 8  use Carp qw/confess/; Line 8  use Carp qw/confess/;
8  has 'head' => (  has 'head' => (
9          is => 'rw',          is => 'rw',
10          isa => 'ArrayRef[Str]',          isa => 'ArrayRef[Str]',
11          default => sub { [] },          default => sub { [ 'static/frey.css' ] },
12  );  );
13    
14  sub dom2html {  sub dom2html {
# Line 72  sub page { Line 72  sub page {
72          . ( $a->{head} || '' )          . ( $a->{head} || '' )
73          . '</head><body>'          . '</head><body>'
74          . ( $a->{body} || '<!-- no body -->' )          . ( $a->{body} || '<!-- no body -->' )
75  #       . qq|<div class="frey-status-line"> <a href="/">Frey</a> $Frey::VERSION <a href="?reload=$reload_counter">reload</a> </div>|          . qq|<div class="frey-status-line"> <a href="/">Frey</a> $Frey::VERSION <a href="?reload=$reload_counter">reload</a> </div>|
76          . '</body></html>'          . '</body></html>'
77          ;          ;
78    
Legend:
Removed from v.156  
changed lines
  Added in v.160
  ViewVC Help
Powered by ViewVC 1.1.26