/[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 448 by dpavlin, Wed Nov 19 03:36:24 2008 UTC revision 457 by dpavlin, Wed Nov 19 16:53:13 2008 UTC
# Line 22  has 'status' => ( Line 22  has 'status' => (
22          isa => 'ArrayRef[HashRef[Str]]',          isa => 'ArrayRef[HashRef[Str]]',
23          lazy => 1,          lazy => 1,
24          default => sub { [          default => sub { [
25                  { 'Bookmarklets' => Frey::Bookmarklet->new->markup },                  { 'Bookmarklets' => Frey::Bookmarklet->new->as_markup },
26                  { 'ClassBrowser' => Frey::ClassBrowser->new( usage_on_top => 0 )->markup },                  { 'ClassBrowser' => Frey::ClassBrowser->new( usage_on_top => 0 )->as_markup },
27          ] },          ] },
28  );  );
29    
# Line 168  sub page { Line 168  sub page {
168          my $url = $self->request_url;          my $url = $self->request_url;
169          $url =~ s{\?reload=\d+}{};          $url =~ s{\?reload=\d+}{};
170    
171          my $body = $a->{body} || $self->markup;          my $body = $a->{body} || $self->as_markup;
172          return $body if $self->content_type !~ m{html};          return $body if $self->content_type !~ m{html};
173          $body ||= '<!-- no body -->';          $body ||= '<!-- no body -->';
174    
Legend:
Removed from v.448  
changed lines
  Added in v.457
  ViewVC Help
Powered by ViewVC 1.1.26