Annotation of /share/web/templates/fragments/feeds

<%args>
$q
$feed => undef
$item_fragment => 'long'
</%args>
<%init>

my $feeds = Grep::Model::FeedCollection->new();
$feeds->unlimit();

my $count;

if ($feed) {
        my $fetch = Jifty->web->new_action(
                class => 'Fetch',
#               moniker => 'fetch_feed',
                arguments => {
                        q => $q,
                        feed => $feed,
                        item_fragment => $item_fragment,
                        publish => 1,
                }
        );
        warn "run action Fetch( $q , $feed , $item_fragment ) returned $count results";
        $fetch->run;
        $count = $fetch->result->content('count');
}

</%init>

Search remote feeds for '<% $q %>'
<ul>
% while ( my $f = $feeds->next ) {
        <li>
%       if ( $feed and $f->id == $feed ) {
        <% $f->title %> <em><% $count ? $count : 'no ' %> results</em>
%       } else {
<% Jifty->web->link(
        label => $f->title,
        onclick => {
                #replace_width => '/fragments/feeds',
                args => {
                        q => $q,
                        feed => $f->id,
                        item_fragment => $item_fragment,
                },
        },
) %>
%       }
        </li>
% }
</ul>


1	dpavlin	29	<%args>
2			$q
3			$feed => undef
4	dpavlin	42	$item_fragment => 'long'
5	dpavlin	29	</%args>
6			<%init>
7
8			my $feeds = Grep::Model::FeedCollection->new();
9			$feeds->unlimit();
10
11	dpavlin	42	my $count;
12	dpavlin	30
13	dpavlin	29	if ($feed) {
14			my $fetch = Jifty->web->new_action(
15			class => 'Fetch',
16	dpavlin	42	# moniker => 'fetch_feed',
17	dpavlin	29	arguments => {
18			q => $q,
19			feed => $feed,
20	dpavlin	30	item_fragment => $item_fragment,
21	dpavlin	29	publish => 1,
22			}
23			);
24	dpavlin	43	warn "run action Fetch( $q , $feed , $item_fragment ) returned $count results";
25			$fetch->run;
26	dpavlin	42	$count = $fetch->result->content('count');
27	dpavlin	29	}
28
29			</%init>
30
31	dpavlin	42	Search remote feeds for '<% $q %>'
32	dpavlin	29	<ul>
33			% while ( my $f = $feeds->next ) {
34	dpavlin	42	<li>
35			% if ( $feed and $f->id == $feed ) {
36			<% $f->title %> <em><% $count ? $count : 'no ' %> results</em>
37			% } else {
38			<% Jifty->web->link(
39	dpavlin	29	label => $f->title,
40			onclick => {
41	dpavlin	42	#replace_width => '/fragments/feeds',
42	dpavlin	29	args => {
43			q => $q,
44			feed => $f->id,
45	dpavlin	30	item_fragment => $item_fragment,
46	dpavlin	29	},
47			},
48	dpavlin	42	) %>
49			% }
50			</li>
51	dpavlin	29	% }
52			</ul>
53
54