/[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 887 by dpavlin, Wed Dec 24 13:51:59 2008 UTC revision 898 by dpavlin, Wed Dec 24 22:20:10 2008 UTC
# Line 118  sub html { Line 118  sub html {
118                                          $body .= '<tr><th>' . join('</th><th>', @{$data->{NAME}} ) . '</th></tr>';                                          $body .= '<tr><th>' . join('</th><th>', @{$data->{NAME}} ) . '</th></tr>';
119                                          $body .= '<tr><td>' . join('</td><td>', @$_ ) . '</td></tr>' foreach @{ $data->{rows} };                                          $body .= '<tr><td>' . join('</td><td>', @$_ ) . '</td></tr>' foreach @{ $data->{rows} };
120                                          $body .= '</table>';                                          $body .= '</table>';
121                                            
122                                            delete( $data->{rows} ); # too much dumplication
123                                            $body .= Frey::View::Dumper->new( data => $data )->as_markup if $data;
124                                  }                                  }
125                          } elsif ( $self->run =~ m{(as_data|sql)} ) {                          } elsif ( $self->run =~ m{(as_data|sql)} ) {
126                                  my $run = $self->run;                                  my $run = $self->run;
# Line 134  sub html { Line 137  sub html {
137                          }                          }
138                          if ( ! $html ) {                          if ( ! $html ) {
139                                  $body  = Frey::View::Dumper->new( data => $body )->as_markup if ref $body;                                  $body  = Frey::View::Dumper->new( data => $body )->as_markup if ref $body;
140                                  $body .= Frey::View::Dumper->new( data => $data )->as_markup if defined $data;                                  $body .= Frey::View::Dumper->new( data => $data )->as_markup if defined $data && ! defined $body;
141                          }                          }
142    
143                          $o->title( $class );                          $o->title( $class );
Legend:
Removed from v.887  
changed lines
  Added in v.898
  ViewVC Help
Powered by ViewVC 1.1.26