/[Frey]/branches/zimbardo/t/90-frey-server.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 /branches/zimbardo/t/90-frey-server.t

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

revision 103 by dpavlin, Fri Jul 11 23:08:25 2008 UTC revision 131 by dpavlin, Tue Jul 15 13:45:33 2008 UTC
# Line 2  Line 2 
2  use strict;  use strict;
3  use warnings;  use warnings;
4    
5  use Test::More tests => 6;  use Test::More tests => 11;
6  use lib 'lib';  use lib 'lib';
7    
8  BEGIN {  BEGIN {
9          use_ok('Frey::Test');          use_ok('Frey::Test');
10            use_ok('Test::WWW::Mechanize');
11  }  }
12    
 eval "use Test::WWW::Mechanize";  
 if($@) {  
         plan skip_all => 'Test::WWW::Mechanize not installed';  
         exit;  
 }  
13    
14  ok( my $kid_out = Frey::Test->start_server, 'start_server' );  ok( my $kid_out = Frey::Test->start_server, 'start_server' );
15  ok( my $server = Frey::Test->get_server( $kid_out ), 'get_server' );  ok( my $server = Frey::Test->get_server( $kid_out ), 'get_server' );
# Line 23  $mech->get_ok( $server ); Line 19  $mech->get_ok( $server );
19    
20  $mech->content_contains("Frey");  $mech->content_contains("Frey");
21    
22  #$mech->field( name => $name );  $mech->get_ok( '/ob/Strix::User' );
23  #$mech->field( favorite => $thing1, 1 );  $mech->content_contains("Email");
24  #$mech->field( favorite => $thing2, 2 );  
25  #$mech->field( favorite => $thing3, 3 );  $mech->get_ok( '/~/Frey::Introspect' );
26    $mech->content_contains("introspect.css");
27    
28    #diag $mech->content;
29    
30    #$mech->field( email => 'test@example.com' );   # FIXME we mungle field names
31  #$mech->submit;  #$mech->submit;
32    
33    #$mech->content_contains('test@example.com');
34    
35  ok( Frey::Test->stop_server, 'stop_server' );  ok( Frey::Test->stop_server, 'stop_server' );
36    
Legend:
Removed from v.103  
changed lines
  Added in v.131
  ViewVC Help
Powered by ViewVC 1.1.26