Contents of /share/web/templates/fragments/result

<%ARGS>
$event => undef
$item => undef
</%ARGS>
<%init>

die "need event or item!" unless ($event or $item);

# unpack item from event
$item = $$event if ($event);

die "don't have item" unless ($item);

use Data::Dump qw/dump/;
warn "item = ",dump($item);

</%init>

<div class="result">

<a class="title" href="<% $item->link %>"><% $item->title %></a>
<span class="feed">in <% $item->in_feed->title %></span>
<a class="skip-next" href="#a<% $item->id %>">&gt;&gt;</a>

<div class="content">
<% $item->content | n %>
</div><!-- content -->

% foreach my $f ( qw/category author issued modified/ ) {
%       if ( $item->$f ) {
<span class="<% $f %>"><% $item->$f %></span>
%       }
% }

</div><!-- result -->
<a name="a<% $item->id %>"/>
1	<%ARGS>
2	$event => undef
3	$item => undef
4	</%ARGS>
5	<%init>
6
7	die "need event or item!" unless ($event or $item);
8
9	# unpack item from event
10	$item = $$event if ($event);
11
12	die "don't have item" unless ($item);
13
14	use Data::Dump qw/dump/;
15	warn "item = ",dump($item);
16
17	</%init>
18
19	<div class="result">
20
21	<a class="title" href="<% $item->link %>"><% $item->title %></a>
22	<span class="feed">in <% $item->in_feed->title %></span>
23	<a class="skip-next" href="#a<% $item->id %>">>></a>
24
25	<div class="content">
26	<% $item->content \| n %>
27	</div><!-- content -->
28
29	% foreach my $f ( qw/category author issued modified/ ) {
30	% if ( $item->$f ) {
31	<span class="<% $f %>"><% $item->$f %></span>
32	% }
33	% }
34
35	</div><!-- result -->
36	<a name="a<% $item->id %>"/>