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

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

revision 402 by dpavlin, Tue Nov 18 02:18:38 2008 UTC revision 864 by dpavlin, Tue Dec 16 21:09:11 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 => 7;  use Test::More tests => 8;
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::Bootstrap');
14          use_ok('Frey::Run');          use_ok('Frey::Run');
15  }  }
16    
17  ok( my $o = Frey::Run->new( class => 'Frey::Feed', debug => $debug ), "Frey::Feed" );  ok( my $o = Frey::Run->new( class => 'Frey::Feed', request_url => '/', debug => $debug ), "Frey::Feed" );
18  ok( my $html = $o->html );  ok( my $html = $o->html );
19  diag $html if $debug;  diag $html if $debug;
20    
21  ok( $o->run('sponge'), 'sponge' );  ok( $o->run('as_sponge'), 'as_ponge' );
22  ok( $html = $o->html );  ok( $html = $o->html );
23  diag $html if $debug;  diag $html if $debug;
24    
Legend:
Removed from v.402  
changed lines
  Added in v.864
  ViewVC Help
Powered by ViewVC 1.1.26