/[Frey]/trunk/t/05-frey-json.t
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/t/05-frey-json.t

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

revision 454 by dpavlin, Wed Nov 19 03:36:24 2008 UTC revision 455 by dpavlin, Wed Nov 19 15:28:23 2008 UTC
# Line 14  BEGIN { Line 14  BEGIN {
14  }  }
15    
16  ok( my $o = Frey::JSON->new( data => { foo => 'bar' } ), 'new' );  ok( my $o = Frey::JSON->new( data => { foo => 'bar' } ), 'new' );
17  ok( my $markup = $o->markup, 'markup' );  ok( my $markup = $o->as_markup, 'markup' );
18  diag $markup if $debug;  diag $markup if $debug;
19  like( $markup, qr/foo.*bar/, 'correct' );  like( $markup, qr/foo.*bar/, 'correct' );
20  cmp_ok( $o->page, 'eq', $markup, 'no html markup' );  cmp_ok( $o->page, 'eq', $markup, 'no html markup' );
Legend:
Removed from v.454  
changed lines
  Added in v.455
  ViewVC Help
Powered by ViewVC 1.1.26