Test::Mock::CouchDBSchema - A module to make mocking a DB::CouchDB::Schema easier

DB-CouchDB-Schema documentation Contained in the DB-CouchDB-Schema distribution.

Index

Code Index:

NAME

Top

Test::Mock::CouchDBSchema - A module to make mocking a DB::CouchDB::Schema easier

SYNOPSIS

Top

DB-CouchDB-Schema documentation Contained in the DB-CouchDB-Schema distribution. 
package Test::Mock::CouchDBSchema;
use DB::CouchDB::Schema;
use Moose;
use Moose::Util::TypeConstraints;


subtype mock_hash => as 'Hash' =>
    where sub {
        my $hash = $_;
        return 1 if (exists $$hash{name} && exists $$hash{code});
        return;
    };

has mocked => (is => 'rw', isa => 'HashRef[mock_hash]');

sub mock_view {
    my $self = shift;
    my $view_name = shift;
    my $view_value = shift;
}