Arh/Model/Chronology.pm

use strict;
use warnings;

package Arh::Model::Chronology;
use Jifty::DBI::Schema;

use Arh::Record schema {

        column name =>
                type is 'text',
                label is _("Name"),
                is mandatory;

        column year_from =>
                type is 'text',
                label is _("From year");

        column year_to =>
                type is 'text',
                label is _("To year");

        column part_of =>
                label is _("Part of"),
                refers_to Arh::Model::Chronology;

};

#use Jifty::Plugin::ActorMetadata::Mixin::Model::ActorMetadata; # created_by, created_on, updated_on

# Your model-specific methods go here.

sub since { '0.0.3' }

sub current_user_can {
        my ( $self, $action,$item,$name ) = @_;
        return 1 if $self->current_user->superuser || $self->current_user->administrator;
        return 1 if $self->current_user->id && $action eq 'read';
    return 0;
}

1;

1	use strict;
2	use warnings;
3
4	package Arh::Model::Chronology;
5	use Jifty::DBI::Schema;
6
7	use Arh::Record schema {
8
9	column name =>
10	type is 'text',
11	label is _("Name"),
12	is mandatory;
13
14	column year_from =>
15	type is 'text',
16	label is _("From year");
17
18	column year_to =>
19	type is 'text',
20	label is _("To year");
21
22	column part_of =>
23	label is _("Part of"),
24	refers_to Arh::Model::Chronology;
25
26	};
27
28	#use Jifty::Plugin::ActorMetadata::Mixin::Model::ActorMetadata; # created_by, created_on, updated_on
29
30	# Your model-specific methods go here.
31
32	sub since { '0.0.3' }
33
34	sub current_user_can {
35	my ( $self, $action,$item,$name ) = @_;
36	return 1 if $self->current_user->superuser \|\| $self->current_user->administrator;
37	return 1 if $self->current_user->id && $action eq 'read';
38	return 0;
39	}
40
41	1;
42