File: list

package info (click to toggle)
libcatalyst-model-cdbi-crud-perl 0.04-4
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, forky, sid, trixie
  • size: 104 kB
  • sloc: perl: 36; makefile: 2
file content (32 lines) | stat: -rw-r--r-- 962 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
[% USE class = Class(class) %]
[% action = c.request.action %]
<table>
    <tr>
    [% primary = class.primary_column %]
    [% FOR column = class.columns %]
        [% NEXT IF column == primary %]
        <th>[% column %]</th>
    [% END %]
        <th/>
    </tr>
    [% FOR object = class.retrieve_all %]
        <tr>
        [% FOR column = class.columns.list %]
            [% NEXT IF column == primary %]
            <td>[% object.$column %]</td>
        [% END %]
            <td>
                <a href="[% base _ action _ '/view/' _ object.$primary %]">
                    View
                </a>
                <a href="[% base _ action _ '/edit/' _ object.$primary %]">
                    Edit
                </a>
                <a href="[% base _ action _ '/destroy/' _ object.$primary %]">
                    Destroy
                </a>
            </td>
        </tr>
    [% END %]
</table>
<a href="[% base _ action _ '/add' %]">Add</a>