The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
package # hide from PAUSE
Catalyst::Model::KiokuDB::Test;

use Catalyst qw(
    -Debug
    Authentication
);

{
    package # hide from PAUSE
    FakeLogger;

    sub clear { @{$_[0]} = () }

    sub str { join "\n", map { "$_->[0] - $_->[1]" } @{$_[0]} }

    sub AUTOLOAD {
        my $self = shift;
        my ( $method ) = ( our $AUTOLOAD =~ /(\w+)$/ );
        push @$self, [ $method => @_ ];
    }
}

our $log = bless [], "FakeLogger";

__PACKAGE__->log($log);

__PACKAGE__->config(
	'Plugin::Authentication' => {
		realms => {
			default => {
				credential => {
					class         => 'Password',
					password_type => 'self_check'
				},
				store => {
					class      => 'Model::KiokuDB',
                    model_name => "kiokudb",
				}
			}
		}
	}
);

__PACKAGE__->setup();

__PACKAGE__

__END__