[catagits/App-IdiotBox.git] / lib / App / IdiotBox / Announcement.pm

package App::IdiotBox::Announcement;

use Moo;

sub fields { return qw(id made_at bucket_slug) }

sub id { shift->{id} }
sub made_at { shift->{made_at} } 
sub bucket { shift->{bucket} } 
sub video_count { shift->{video_count} } 

1;
Commit	Line	Data
f29e9b6f	1	package App::IdiotBox::Announcement;
	2
	3	use Moo;
	4
	5	sub fields { return qw(id made_at bucket_slug) }
	6
	7	sub id { shift->{id} }
	8	sub made_at { shift->{made_at} }
	9	sub bucket { shift->{bucket} }
	10	sub video_count { shift->{video_count} }
	11
	12	1;