Parent Directory | Revision Log | Patch
revision 39 by dpavlin, Thu Jan 18 17:53:58 2007 UTC | revision 41 by dpavlin, Thu Jan 18 18:55:17 2007 UTC | |
---|---|---|
# | Line 29 warn $queries->build_select_query; | Line 29 warn $queries->build_select_query; |
29 | % if ( $edit ) { | % if ( $edit ) { |
30 | <tt>[<% $q->on_database->id . ': ' . $q->on_database->dsn %>]</tt> | <tt>[<% $q->on_database->id . ': ' . $q->on_database->dsn %>]</tt> |
31 | % } | % } |
32 | <%perl> | |
33 | my $name = $q->on_database->dsn; | |
34 | $name =~ s/^.*dbname=//; | |
35 | $m->out("<a href=\"/static/spy/$name/index.html\">$name</a>"); | |
36 | </%perl> | |
37 | </span> | </span> |
38 | ||
39 | </dt> | </dt> |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |