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

Contents of /trunk/share/web/templates/fragments/queries

Parent Directory Parent Directory | Revision Log Revision Log


Revision 77 - (show annotations)
Sun Jan 28 15:24:42 2007 UTC (17 years, 2 months ago) by dpavlin
File size: 1430 byte(s)
converted list to region, added order links
1 <%args>
2 $database_id => undef
3 $order
4 </%args>
5 <%init>
6 my $queries = SQLSession::Model::QueryCollection->new();
7
8 my $edit = Jifty->web->current_user->role('edit');
9
10 #use Data::Dump qw/dump/;
11 #warn "current_user = ", dump( Jifty->web->current_user );
12 #warn "edit = $edit";
13
14 $queries->unlimit;
15 $queries->limit( column => 'on_database', value => $database_id ) if ( $database_id );
16 $queries->order_by( column => $order, order => 'asc' );
17
18 warn $queries->build_select_query,$/;
19
20 warn "order: $order\n";
21
22 </%init>
23
24 Sort by:
25 % foreach my $c ( qw/name created_on owner/ ) {
26 <% $order ne $c ? Jifty->web->link(
27 label => $c,
28 onclick => {
29 replace_with => '/fragments/queries',
30 args => {
31 database_id => $database_id,
32 order => $c,
33 },
34 },
35 #as_button => 1,
36 ) : $c %>
37 % }
38
39 <dl>
40 % while (my $q = $queries->next) {
41 <dt><% Jifty->web->tangent(
42 url => '/sql/' . $q->id,
43 label => $q->name,
44 ) %>
45
46 <span class="database-name">
47 <% $q->on_database->name %>
48 |
49 <% defined($q->owner->name) ? $q->owner->name : '?' %>
50 |
51 <% $q->created_on->ymd . ' ' . $q->created_on->hms %>
52
53 <span class="database-schema">
54 <%perl>
55 my $name = $q->on_database->dsn;
56 $name =~ s/^.*dbname=//;
57 $m->out("<a href=\"/static/spy/$name/index.html\" target=\"_spy\">$name shema</a>");
58 </%perl>
59 </span>
60
61 </span>
62
63 </dt>
64 <dd>
65 % if ($q->note) {
66 <div class="sql-note"><% $q->note %></div>
67 % }
68 <pre class="sql"><% $q->sql_query %></pre>
69 </dd>
70 % }
71 </dl>

  ViewVC Help
Powered by ViewVC 1.1.26