Arh/Model/UnitPicture.pm

use strict;
use warnings;

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

use Data::Dump qw/dump/;

use Arh::Record schema {
        
        column unit =>
                refers_to Arh::Model::Unit,
                label is _("Unit"),
                is mandatory;
        column picture =>
                refers_to Arh::Model::Picture,
                label is _("Picture"),
                ajax validates,
                is mandatory;

};

sub since { '0.0.11' };

# Your model-specific methods go here.

use Arh::DefaultACL;

1;

1	dpavlin	28	use strict;
2			use warnings;
3
4			package Arh::Model::UnitPicture;
5			use Jifty::DBI::Schema;
6
7	dpavlin	34	use Data::Dump qw/dump/;
8
9	dpavlin	28	use Arh::Record schema {
10
11			column unit =>
12			refers_to Arh::Model::Unit,
13			label is _("Unit"),
14			is mandatory;
15			column picture =>
16			refers_to Arh::Model::Picture,
17			label is _("Picture"),
18	dpavlin	34	ajax validates,
19	dpavlin	28	is mandatory;
20
21			};
22
23			sub since { '0.0.11' };
24
25			# Your model-specific methods go here.
26
27			use Arh::DefaultACL;
28
29			1;
30