--- trunk/lib/SQLSession/Dispatcher.pm	2006/12/07 23:45:11	32
+++ trunk/lib/SQLSession/Dispatcher.pm	2006/12/09 01:15:02	33
@@ -7,6 +7,15 @@
 
 use Data::Dump qw/dump/;
 
+before '*' => run {
+	my $top = Jifty->web->navigation;
+	my $edit = Jifty->config->app('edit');
+	$top->child( 'New' => url => '/new' ) if ($edit);
+	$top->child( 'List' => url => '/list' );
+};
+
+
+
 under qr{sql/(\d+)} => run {
 
 	my $q = SQLSession::Model::Query->new();