13 |
use XML::Feed; |
use XML::Feed; |
14 |
use LWP::UserAgent; |
use LWP::UserAgent; |
15 |
|
|
|
use Grep::Search; |
|
16 |
use Grep::Source; |
use Grep::Source; |
17 |
|
|
18 |
use Data::Dump qw/dump/; |
use Data::Dump qw/dump/; |
32 |
my $feeds = Grep::Model::FeedCollection->new; |
my $feeds = Grep::Model::FeedCollection->new; |
33 |
$feeds->order_by({ column => 'title', order => 'ASC' }); |
$feeds->order_by({ column => 'title', order => 'ASC' }); |
34 |
$feeds->unlimit; |
$feeds->unlimit; |
35 |
warn "feeds ", $feeds->build_select_query; |
#warn "feeds ", $feeds->build_select_query; |
36 |
[{ |
[{ |
37 |
display_from => 'title', |
display_from => 'title', |
38 |
value_from => 'id', |
value_from => 'id', |
90 |
return $items; |
return $items; |
91 |
|
|
92 |
} else { |
} else { |
93 |
return $self->result->error( "No results for '$q'" ); |
return $self->result->error( "No results for '$q' in " . $feed->title ); |
94 |
} |
} |
95 |
} |
} |
96 |
|
|