1 |
<%init> |
2 |
my $queries = SQLSession::Model::QueryCollection->new(); |
3 |
$queries->unlimit(); |
4 |
|
5 |
</%init> |
6 |
|
7 |
<&| /_elements/wrapper, title => "Available queries" &> |
8 |
<dl> |
9 |
% while (my $q = $queries->next) { |
10 |
<dt><% Jifty->web->tangent( |
11 |
url => '/sql/' . $q->id, |
12 |
label => $q->name, |
13 |
) %></dt> |
14 |
<dd> |
15 |
<pre class="sql"><% $q->sql_query %></pre> |
16 |
<div class="sql-note"><% $q->note %></div> |
17 |
<div class="database-name">on <% $q->on_database->name %> <tt>[<% $q->on_database->dsn %>]</tt></div> |
18 |
</dd> |
19 |
% } |
20 |
</dl> |
21 |
</&> |
22 |
|
23 |
<% Jifty->web->tangent( url => '/new', label => 'New SQL query' ) %> |