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

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

revision 220 by dpavlin, Wed Aug 12 22:27:57 2009 UTC revision 221 by dpavlin, Sat Aug 15 14:21:55 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 => 5;  use Test::More tests => 7;
8  use Data::Dump qw/dump/;  use Data::Dump qw/dump/;
9    
10  use_ok 'CouchDB';  use_ok 'CouchDB';
# Line 18  ok( $db->put( $url, { foo => 42, bar => Line 18  ok( $db->put( $url, { foo => 42, bar =>
18    
19  ok( my $doc = $db->get( $url, 'get' ), 'get' );  ok( my $doc = $db->get( $url, 'get' ), 'get' );
20    
21  diag dump( $doc );  diag 'doc ', dump( $doc );
22    
23  #ok( $db->delete( "$db" ), 'delete' );  ok( $db->put( $url, { foo => 99 }), "put $url" );
24    
25    ok( $db->delete( $url ), 'delete' );
26    
27    ok( CouchDB::audit( 'test', { foo => 42, bar => 'baz' }), 'audit' );
28    
 ok( $db->audit( 'test', { foo => 42, bar => 'baz' }), 'audit' );  
Legend:
Removed from v.220  
changed lines
  Added in v.221
  ViewVC Help
Powered by ViewVC 1.1.26