Reblog/ResultSet/Items.pm

package Reblog::ResultSet::Items;

use strict;
use warnings;

use base qw(DBIx::Class::ResultSet);

sub published {
        shift->search({
                'userdata.label' => 'published',
                'userdata.value_numeric' => 1,
        }, {
                join => [ 'userdata' ],
        })
        ;
}

warn "# publised";

1;

1	dpavlin	1031	package Reblog::ResultSet::Items;
2
3			use strict;
4			use warnings;
5
6			use base qw(DBIx::Class::ResultSet);
7
8			sub published {
9			shift->search({
10			'userdata.label' => 'published',
11			'userdata.value_numeric' => 1,
12			}, {
13			join => [ 'userdata' ],
14			})
15			;
16			}
17
18			warn "# publised";
19
20			1;
21