/[pxelator]/lib/PXElator/t/config.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 /lib/PXElator/t/config.t

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

revision 141 by dpavlin, Tue Aug 4 15:25:09 2009 UTC revision 142 by dpavlin, Tue Aug 4 18:05:49 2009 UTC
# Line 4  use warnings; Line 4  use warnings;
4  use strict;  use strict;
5  use autodie;  use autodie;
6    
7  use Test::More tests => 2;  use Test::More tests => 3;
8  use Data::Dump qw/dump/;  use Data::Dump qw/dump/;
9    
10  use_ok 'config';  use_ok 'config';
11    
12  sub test { config::webconverger( '172.0.0.1' ) };  sub test {
13            my $name = shift;
14            eval 'config::' . $name . '( "172.0.0.1" );';
15    }
16    
17  ok( test(), 'webconverger' );  ok( test($_), $_ ) foreach ( 'webconverger', 'debirf' );
Legend:
Removed from v.141  
changed lines
  Added in v.142
  ViewVC Help
Powered by ViewVC 1.1.26