--- trunk/share/web/templates/list 2007/01/21 13:01:08 48 +++ trunk/share/web/templates/list 2007/01/21 14:00:28 53 @@ -34,11 +34,14 @@ % if ( $edit ) { [<% $q->on_database->id . ': ' . $q->on_database->dsn %>] % } -<%perl> + + <%perl> my $name = $q->on_database->dsn; $name =~ s/^.*dbname=//; - $m->out("$name"); - + $m->out("$name shema"); + + +