--- trunk/lib/SQLSession/Dispatcher.pm 2007/01/28 11:36:37 75 +++ trunk/lib/SQLSession/Dispatcher.pm 2007/01/29 20:11:20 78 @@ -39,7 +39,6 @@ }; - under qr{sql/(\d+)} => run { my $q = SQLSession::Model::Query->new(); @@ -47,9 +46,7 @@ # warn "q = ",dump( $q ); - set sql_query => $q->sql_query; - set name => $q->name; - set database => $q->on_database->id; + set q => $q; show '/sql';