web/templates/index.html

<%init>

my $region = Jifty::Web::PageRegion->new(
        name => 'results',
);

Jifty->subs->add(
        class => 'Result',
        mode => 'Bottom',
        region => 'results',
        render_with => '/fragments/result',
);

my $search = Jifty->web->new_action(
        class => 'SearchItem',
        moniker => 'search',
        arguments => { %ARGS },
        sticky_on_success => 1,
);

use Data::Dump qw/dump/;

</%init>

<&| /_elements/wrapper, title => 'Grep - powerful RSS searcher' &>

<& /fragments/bookmarklet &>

<% Jifty->web->form->start %>

<% $search->form_field('content_contains') %>

<% $search->button( label => 'Grep' ) %>

<% Jifty->web->form->end %>

% my $results = Jifty->web->response->result('search');
% warn "result = ",dump( $results );
% if ( $results and $results->content('search') ) {
%       my $coll = $results->content('search');
%       while ( my $i = $coll->next ) {
<& /fragments/result, item => $i &>
%       }
% }

Results: <% $region->render %>

</&>
1	dpavlin	9	<%init>
2
3			my $region = Jifty::Web::PageRegion->new(
4			name => 'results',
5			);
6
7			Jifty->subs->add(
8			class => 'Result',
9			mode => 'Bottom',
10			region => 'results',
11			render_with => '/fragments/result',
12			);
13
14	dpavlin	23	my $search = Jifty->web->new_action(
15			class => 'SearchItem',
16			moniker => 'search',
17	dpavlin	9	arguments => { %ARGS },
18			sticky_on_success => 1,
19			);
20
21			use Data::Dump qw/dump/;
22
23			</%init>
24
25	dpavlin	18	<&\| /_elements/wrapper, title => 'Grep - powerful RSS searcher' &>
26	dpavlin	9
27	dpavlin	22	<& /fragments/bookmarklet &>
28	dpavlin	10
29	dpavlin	9	<% Jifty->web->form->start %>
30
31	dpavlin	23	<% $search->form_field('content_contains') %>
32	dpavlin	9
33	dpavlin	23	<% $search->button( label => 'Grep' ) %>
34	dpavlin	9
35			<% Jifty->web->form->end %>
36
37	dpavlin	23	% my $results = Jifty->web->response->result('search');
38			% warn "result = ",dump( $results );
39			% if ( $results and $results->content('search') ) {
40			% my $coll = $results->content('search');
41			% while ( my $i = $coll->next ) {
42			<& /fragments/result, item => $i &>
43	dpavlin	9	% }
44			% }
45
46			Results: <% $region->render %>
47
48			</&>