<H2><%%= title_proc( Time::at( <%=@date.to_i%> ), <%= title.dump.gsub( /%/, '\\\\045' ) %> ) %></H2>
<%%= body_enter_proc( Time::at( <%=@date.to_i%> ) ) %>
<%= to_html( opt, :CHTML ) %>
<%%= body_leave_proc( Time::at( <%=@date.to_i%> ) ) %><%
if opt['show_comment'] and count_comments > 0 then
	idx = 0 %>
	<P><%%=comment_today%><%%=comment_total( <%=count_comments%> )%>:<BR><%
	each_comment(opt['comment_limit'] ) do |comment|
		if comment.visible? %>
			<A NAME="c<%= '%02d' % idx += 1 %>">#</A>
			<%=h comment.name %>&nbsp;[<%= comment.shorten( 200 ).make_link %>]<BR><%
		else
			idx += 1
		end
	end %></P>
	<%
end %>
