From dd8d45f2ccf3d70ce5c035d5dfd74c73fa3eaf03 Mon Sep 17 00:00:00 2001 From: Dobrica Pavlinusic Date: Sat, 23 Jan 2010 18:05:37 +0000 Subject: [PATCH] abstract store with audit method --- lib/PXElator/store.pm | 10 ++++++++++ lib/PXElator/t/store.t | 13 +++++++++++++ 2 files changed, 23 insertions(+) create mode 100644 lib/PXElator/store.pm create mode 100755 lib/PXElator/t/store.t diff --git a/lib/PXElator/store.pm b/lib/PXElator/store.pm new file mode 100644 index 0000000..e246781 --- /dev/null +++ b/lib/PXElator/store.pm @@ -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 index 0000000..24a5f13 --- /dev/null +++ b/lib/PXElator/t/store.t @@ -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' ); + -- 2.20.1