/[cwmp]/google/branches/store-pluggable/t/05-store.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 /google/branches/store-pluggable/t/05-store.t

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

revision 133 by dpavlin, Fri Oct 26 19:21:53 2007 UTC revision 134 by dpavlin, Fri Oct 26 20:46:09 2007 UTC
# Line 4  use warnings; Line 4  use warnings;
4    
5  my $debug = shift @ARGV;  my $debug = shift @ARGV;
6    
7  use Test::More tests => 17;  use Test::More tests => 18;
8  use Data::Dump qw/dump/;  use Data::Dump qw/dump/;
9  use Cwd qw/abs_path/;  use Cwd qw/abs_path/;
10  use lib 'lib';  use lib 'lib';
11    
12  BEGIN {  BEGIN {
13          use_ok('CWMP::Store');          use_ok('CWMP::Store');
14            use_ok('CWMP::Store::DBMDeep');
15  }  }
16    
17  ok(my $abs_path = abs_path($0), "abs_path");  ok(my $abs_path = abs_path($0), "abs_path");
# Line 22  unlink $path if -e $path; Line 23  unlink $path if -e $path;
23    
24  ok( my $store = CWMP::Store->new({  ok( my $store = CWMP::Store->new({
25          debug => $debug,          debug => $debug,
26            module => 'DBMDeep',
27          path => $path,          path => $path,
28  }), 'new' );  }), 'new' );
29  isa_ok( $store, 'CWMP::Store' );  isa_ok( $store, 'CWMP::Store' );
Legend:
Removed from v.133  
changed lines
  Added in v.134
  ViewVC Help
Powered by ViewVC 1.1.26