--- lib/PXElator/t/CouchDB.t 2009/08/15 13:47:37 220 +++ lib/PXElator/t/CouchDB.t 2009/08/15 14:21:55 221 @@ -4,7 +4,7 @@ use strict; use autodie; -use Test::More tests => 5; +use Test::More tests => 7; use Data::Dump qw/dump/; use_ok 'CouchDB'; @@ -18,8 +18,11 @@ ok( my $doc = $db->get( $url, 'get' ), 'get' ); -diag dump( $doc ); +diag 'doc ', dump( $doc ); -#ok( $db->delete( "$db" ), 'delete' ); +ok( $db->put( $url, { foo => 99 }), "put $url" ); + +ok( $db->delete( $url ), 'delete' ); + +ok( CouchDB::audit( 'test', { foo => 42, bar => 'baz' }), 'audit' ); -ok( $db->audit( 'test', { foo => 42, bar => 'baz' }), 'audit' );