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

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

revision 422 by dpavlin, Tue Nov 18 17:12:09 2008 UTC revision 423 by dpavlin, Tue Nov 18 19:50:45 2008 UTC
# Line 8  with 'Frey::Escape'; Line 8  with 'Frey::Escape';
8  use Data::Dump qw/dump/;  use Data::Dump qw/dump/;
9  use Frey::Dumper;  use Frey::Dumper;
10  use JSON;  use JSON;
11    use YAML;
12    
13  =head1 NAME  =head1 NAME
14    
# Line 76  sub html { Line 77  sub html {
77                          if ( $self->run eq 'markup' ) {                          if ( $self->run eq 'markup' ) {
78                                  warn "## using ",ref($o), "->markup";                                  warn "## using ",ref($o), "->markup";
79                                  if ( $o->can('page') ) {                                  if ( $o->can('page') ) {
80                                          $html = $o->page;                                          #$html = $o->page;
81                                          $body = $o->markup unless $html;                                          $body = $o->markup unless $html;
82                                  } else {                                  } else {
83                                          $body = $o->markup;                                          $body = $o->markup;
# Line 111  sub html { Line 112  sub html {
112                          }                          }
113    
114                          # override our status with one from object                          # override our status with one from object
115                          $self->status( $o->status ) if $o->can('status') && $o->status;                          eval {
116                                    $self->status( $o->status );
117                            };
118                            warn "can't override status: $@" if $@;
119                  };                  };
120    
121    
Legend:
Removed from v.422  
changed lines
  Added in v.423
  ViewVC Help
Powered by ViewVC 1.1.26