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

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

revision 874 by dpavlin, Wed Dec 10 23:12:36 2008 UTC revision 875 by dpavlin, Wed Dec 17 19:40:31 2008 UTC
# Line 4  use warnings; Line 4  use warnings;
4    
5  my $debug = @ARGV ? 1 : 0;  my $debug = @ARGV ? 1 : 0;
6    
7  use Test::More tests => 5;  use Test::More tests => 7;
8  use lib 'lib';  use lib 'lib';
9    
10  use Data::Dump qw/dump/;  use Data::Dump qw/dump/;
11    
12  BEGIN {  BEGIN {
13          use_ok('Frey::SVN');          use_ok('Frey::SVN');
14            use_ok('Test::HTML::Lint');
15  }  }
16    
17  ok( my $o = Frey::SVN->new( request_url => '/', debug => $debug ), 'new' );  ok( my $o = Frey::SVN->new( request_url => '/', debug => $debug ), 'new' );
18  ok( my $markup = $o->as_markup, 'as_markup' );  ok( my $markup = $o->as_markup, 'as_markup' );
19  diag $markup if $debug;  diag $markup if $debug;
20  like( $markup, qr/blockquote/, 'markup content' );  like( $markup, qr/blockquote/, 'markup content' );
21    html_ok( $markup );
22    
23  ok( my $codeswarm = $o->codeswarm_as_markup, 'codeswarm_as_markup' );  ok( my $codeswarm = $o->codeswarm_as_markup, 'codeswarm_as_markup' );
24  diag $codeswarm if $debug;  diag $codeswarm if $debug;
Legend:
Removed from v.874  
changed lines
  Added in v.875
  ViewVC Help
Powered by ViewVC 1.1.26