/[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 135 by dpavlin, Tue Aug 4 13:19:08 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 => 4;  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  ok( my $test = config::shared( 'test', 42 ), 'set shared' );  sub test {
13  diag $test;          my $name = shift;
14  cmp_ok( $test, '==', config::shared( 'test' ), 'get shared' );          eval 'config::' . $name . '( "172.0.0.1" );';
15    }
16    
17  ok( config::webconverger(), 'webconverger' );  ok( test($_), $_ ) foreach ( 'webconverger', 'debirf' );
Legend:
Removed from v.135  
changed lines
  Added in v.142
  ViewVC Help
Powered by ViewVC 1.1.26