--- lib/Arh/Bootstrap.pm	2007/11/29 17:17:16	10
+++ lib/Arh/Bootstrap.pm	2007/11/29 19:32:41	12
@@ -4,6 +4,8 @@
 package Arh::Bootstrap;
 use base qw(Jifty::Bootstrap);
 
+use Data::Dump qw/dump/;
+
 =head1 Bootstrap application data
 
 Create initial data
@@ -11,22 +13,34 @@
 =cut
 
 sub run {
+	warn "## run",dump(@_);
     my $self = shift;
 
 	my $system_user = Arh::CurrentUser->superuser( _bootstrap => 1 );
 
-	my $user = Arh::Model::User->new;
 
-	$user->create(
+	my $u = Arh::Model::User->new(current_user => $system_user);
+
+	$u->create(
 		name => 'Admin',
 		lastname => 'User',
 		email => 'admin@example.com',
 		email_confirmed => 1,
-		password => 'siteadmin',
+		password => 'password',
 		administrator => 1,
 		organization => 'Site administrator',
 	);
 
+	$u->create(
+		name => 'Anonymous',
+		lastname => 'User',
+		email => 'anonymous@example.com',
+		email_confirmed => 1,
+		password => 'password',
+		administrator => 0,
+		organization => 'Part of anonymous user crowd',
+	);
+
 	my $pt = Arh::Model::PictureType->new(current_user => $system_user);
 	
 	$pt->create( name => $_ ) foreach ( qw/
@@ -41,6 +55,8 @@
 	my $chronology = Arh::Model::Chronology->new(current_user => $system_user);
 	$chronology->create(
 		name => 'kraj 8. stoljeća',
+		year_from => 760,
+		year_to => 800,
 	);
 
 	my $material = Arh::Model::Material->new;