abstract store with audit method
authorDobrica Pavlinusic <dpavlin@rot13.org>
Sat, 23 Jan 2010 18:05:37 +0000 (18:05 +0000)
committerDobrica Pavlinusic <dpavlin@rot13.org>
Sat, 23 Jan 2010 18:05:37 +0000 (18:05 +0000)
lib/PXElator/store.pm [new file with mode: 0644]
lib/PXElator/t/store.t [new file with mode: 0755]

diff --git a/lib/PXElator/store.pm b/lib/PXElator/store.pm
new file mode 100644 (file)
index 0000000..e246781
--- /dev/null
@@ -0,0 +1,10 @@
+package store;
+
+use warnings;
+use strict;
+
+use CouchDB;
+
+sub audit { CouchDB::audit(@_) }
+
+1;
diff --git a/lib/PXElator/t/store.t b/lib/PXElator/t/store.t
new file mode 100755 (executable)
index 0000000..24a5f13
--- /dev/null
@@ -0,0 +1,13 @@
+#!/usr/bin/perl
+
+use warnings;
+use strict;
+use autodie;
+
+use Test::More tests => 2;
+use Data::Dump qw/dump/;
+
+use_ok 'store';
+
+ok( store::audit( 'test', { foo => 42, bar => 'baz' }), 'audit' );
+