/[Frey]/trunk/t/30-Frey-Class-Graph.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/30-Frey-Class-Graph.t

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

revision 972 by dpavlin, Fri Jan 9 16:21:26 2009 UTC revision 973 by dpavlin, Fri Jan 9 19:45:26 2009 UTC
# Line 13  BEGIN { Line 13  BEGIN {
13          use_ok('Frey::Class::Graph');          use_ok('Frey::Class::Graph');
14  }  }
15    
16  ok( my $o = Frey::Class::Graph->new( request_url => '/', debug => $debug ), 'new' );  ok( my $o = Frey::Class::Graph->new( request_url => '/', debug => $debug, produce_dot => 1 ), 'new' );
17  ok( my $markup = $o->as_markup, 'as_markup' );  ok( my $markup = $o->as_markup, 'as_markup' );
18  diag $markup if $debug;  diag $markup if $debug;
19  like( $markup, qr/skeleton/, 'markup content' );  like( $markup, qr/graph/, 'dot graph' );
20    
Legend:
Removed from v.972  
changed lines
  Added in v.973
  ViewVC Help
Powered by ViewVC 1.1.26