Parent Directory
| 
Revision Log
| 
Patch
| revision 454 by dpavlin, Wed Nov 19 00:47:22 2008 UTC | revision 455 by dpavlin, Wed Nov 19 15:28:23 2008 UTC | |
|---|---|---|
| # | Line 1 | Line 1 |
| 1 | package Frey::Dumper; | package Frey::Dumper; |
| 2 | use Moose; | use Moose; |
| 3 | ||
| 4 | with 'Frey::Web'; | |
| 5 | with 'Frey::Escape'; | with 'Frey::Escape'; |
| 6 | ||
| 7 | use Data::Dump qw/dump/; | use Data::Dump qw/dump/; |
| # | Line 16 has data => ( | Line 17 has data => ( |
| 17 | required => 1, | required => 1, |
| 18 | ); | ); |
| 19 | ||
| 20 | sub markup { | sub as_markup { |
| 21 | my ($self) = @_; | my ($self) = @_; |
| 22 | qq|<div class="frey-dumper">| . $self->unroll( $self->data ) . qq|</div>|; | qq|<div class="frey-dumper">| . $self->unroll( $self->data ) . qq|</div>|; |
| 23 | } | } |
|
||||||||
| ViewVC Help | |
| Powered by ViewVC 1.1.26 |