use strict;
use warnings;

package TestApp::Plugin::RecordHistory::Model::Ticket;
use Jifty::DBI::Schema;

use TestApp::Plugin::RecordHistory::Record schema {
    column subject =>
        type is 'varchar';
    column forced_readable =>
        type is 'integer',
        default is 1;
    column forced_updatable =>
        type is 'integer',
        default is 1;
    column forced_deletable =>
        type is 'integer',
        default is 1;
};

use Jifty::Plugin::RecordHistory::Mixin::Model::RecordHistory;

sub current_user_can {
    my $self  = shift;
    my $right = shift;

    return 1 if $right eq 'create';
    return 1 if $right eq 'read'   && $self->__value('forced_readable');
    return 1 if $right eq 'update' && $self->__value('forced_updatable');
    return 1 if $right eq 'delete' && $self->__value('forced_deletable');

    return $self->SUPER::current_user_can($right, @_);
}

1;