/[SQLSession]/trunk/share/web/templates/list
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Annotation of /trunk/share/web/templates/list

Parent Directory Parent Directory | Revision Log Revision Log


Revision 38 - (hide annotations)
Thu Jan 18 17:02:24 2007 UTC (17 years, 3 months ago) by dpavlin
File size: 817 byte(s)
slightly better design
1 dpavlin 18 <%init>
2     my $queries = SQLSession::Model::QueryCollection->new();
3 dpavlin 32
4     my $edit = Jifty->config->app('edit');
5     if ( $edit ) {
6     $queries->unlimit;
7     } else {
8     $queries->limit( column => 'visible', value => 1 );
9     }
10 dpavlin 29 $queries->order_by( column => 'name', order => 'asc' );
11 dpavlin 18
12     </%init>
13    
14     <&| /_elements/wrapper, title => "Available queries" &>
15     <dl>
16     % while (my $q = $queries->next) {
17 dpavlin 20 <dt><% Jifty->web->tangent(
18     url => '/sql/' . $q->id,
19     label => $q->name,
20 dpavlin 38 ) %>
21    
22     <span class="database-name">on <% $q->on_database->name %>
23     % if ( $edit ) {
24     <tt>[<% $q->on_database->dsn %>]</tt>
25     % }
26     </span>
27    
28     </dt>
29 dpavlin 18 <dd>
30 dpavlin 29 % if ($q->note) {
31     <div class="sql-note"><% $q->note %></div>
32     % }
33 dpavlin 28 <pre class="sql"><% $q->sql_query %></pre>
34 dpavlin 18 </dd>
35     % }
36     </dl>
37     </&>
38 dpavlin 21
39 dpavlin 32 % if ( $edit ) {
40 dpavlin 21 <% Jifty->web->tangent( url => '/new', label => 'New SQL query' ) %>
41 dpavlin 32 % }

  ViewVC Help
Powered by ViewVC 1.1.26