factor/extra/webapps/pastebin/paste-list.furnace

<% USING: namespaces furnace sequences ; %>

<%
    "Pastebin" "title" set
    "header" render-template
%>

<table width="100%" cellspacing="10">
    <tr>
        <td valign="top">
            <table width="100%">
                <tr align="left" class="pastebin-headings">
                    <th width="50%">Summary:</th>
                    <th width="100">Paste by:</th>
                    <th width="200">Date:</th>
                </tr>
                <% "pastes" get <reversed> [ "paste-summary" render-component ] each %>
            </table>
        </td>
        <td valign="top" width="25%">
            <div class="infobox">
                <p>This pastebin is written in <a href="http://factorcode.org/">Factor</a>. It is inspired by <a href="http://paste.lisp.org">lisppaste</a>.
                </p>
                <p>It can be used for collaborative development over IRC. You can post code for review, and annotate other people's code. Syntax highlighting for over a hundred file types is supported.
                </p>
                <p>
                <% "webapps.pastebin" browse-webapp-source %></p>
            </div>
        </td>
    </tr>
</table>

<% "footer" render-template %>