/[Arh]/lib/Arh/Model/Picture.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Contents of /lib/Arh/Model/Picture.pm

Parent Directory Parent Directory | Revision Log Revision Log


Revision 17 - (show annotations)
Fri Nov 30 17:35:14 2007 UTC (16 years, 4 months ago) by dpavlin
File size: 1023 byte(s)
is required doesn't seem to work, but is mandatory does
1 use strict;
2 use warnings;
3
4 package Arh::Model::Picture;
5 use Jifty::DBI::Schema;
6 use File::Find;
7 use Data::Dump qw/dump/;
8
9 use Arh::Record schema {
10
11 column campaign =>
12 label is _("Part of campaign"),
13 refers_to Arh::Model::Campaign,
14 is mandatory,
15 is indexed,
16 since '0.0.4';
17
18 column filename =>
19 label is _("Picture filename"),
20 is mandatory,
21 is indexed,
22 is unique;
23
24 column type =>
25 label is _("Type of picture"),
26 refers_to Arh::Model::PictureType,
27 is mandatory,
28 is indexed,
29 since '0.0.4';
30
31 };
32
33 # Your model-specific methods go here.
34
35 sub since { '0.0.3' }
36
37 sub all_filenames {
38
39 my @files;
40 my $path = Jifty::Util->app_root . '/share/web/static/pics';
41
42 # warn "## path = $path";
43
44 find({ wanted => sub {
45 my $f = $File::Find::name;
46 return unless -f $f;
47 push @files, $_;
48 }, follow => 0 }, $path);
49
50 # warn "## all_filenames = ",dump( @files );
51
52 return @files;
53 }
54
55 #use Jifty::Plugin::ActorMetadata::Mixin::Model::ActorMetadata; # created_by, created_on, updated_on
56
57 use Arh::DefaultACL;
58
59 1;
60

  ViewVC Help
Powered by ViewVC 1.1.26