package Pear::LocalLoop::Schema::Result::Feedback;
use strict;
use warnings;
use base 'DBIx::Class::Core';
__PACKAGE__->table("feedback");
__PACKAGE__->load_components(qw/
InflateColumn::DateTime
TimeStamp
FilterColumn
/);
__PACKAGE__->add_columns(
"id",
{
data_type => "integer",
is_auto_increment => 1,
is_nullable => 0
},
"user_id" => {
is_foreign_key => 1,
is_nullable => 0,
"submitted_at" => {
data_type => "datetime",
set_on_create => 1,
"feedbacktext" => {
data_type => "text",
"app_name" => {
data_type => "varchar",
size => 255,
"package_name" => {
"version_code" => {
"version_number" => {
"actioned" => {
data_type => "boolean",
default_value => \"false",
);
__PACKAGE__->set_primary_key("id");
__PACKAGE__->belongs_to(
"user",
"Pear::LocalLoop::Schema::Result::User",
{ id => "user_id" },
{ is_deferrable => 0, on_delete => "NO ACTION", on_update => "NO ACTION" },
__PACKAGE__->filter_column( actioned => {
filter_to_storage => 'to_bool',
});
sub to_bool {
my ( $self, $val ) = @_;
my $driver_name = $self->result_source->schema->storage->dbh->{Driver}->{Name};
if ( $driver_name eq 'SQLite' ) {
return $val ? 1 : 0;
} else {
return $val ? 'true' : 'false';
}
1;