--- lib/Arh/Bootstrap.pm	2007/11/29 16:40:10	9
+++ lib/Arh/Bootstrap.pm	2007/11/29 17:17:16	10
@@ -15,6 +15,18 @@
 
 	my $system_user = Arh::CurrentUser->superuser( _bootstrap => 1 );
 
+	my $user = Arh::Model::User->new;
+
+	$user->create(
+		name => 'Admin',
+		lastname => 'User',
+		email => 'admin@example.com',
+		email_confirmed => 1,
+		password => 'siteadmin',
+		administrator => 1,
+		organization => 'Site administrator',
+	);
+
 	my $pt = Arh::Model::PictureType->new(current_user => $system_user);
 	
 	$pt->create( name => $_ ) foreach ( qw/