--- trunk/lib/View.pm	2008/06/29 11:35:23	18
+++ trunk/lib/View.pm	2008/06/29 12:55:39	19
@@ -5,15 +5,15 @@
 
 use Template::Declare::Tags; # defaults to 'HTML'
 use base 'Template::Declare';
-
 use Data::Dump qw/dump/;
 
-template user => sub {
-	my ( $self, $user ) = @_;
-	p {'Hello, world wide web!'}
+template status => sub {
+	my ( $self ) = @_;
+	p { 'Welcome to Frey' }
+	h1 { 'Available templates' }
 	pre {
-		{ class is 'debug' };
-		outs( dump( $user ) );
+		{ class is 'debug' }
+		outs dump( Template::Declare->templates )
 	}
 };