--- lib/Arh/Bootstrap.pm 2007/11/29 19:32:41 12 +++ lib/Arh/Bootstrap.pm 2007/11/30 16:43:53 14 @@ -13,7 +13,7 @@ =cut sub run { - warn "## run",dump(@_); + #warn "## run",dump(@_); my $self = shift; my $system_user = Arh::CurrentUser->superuser( _bootstrap => 1 ); @@ -52,18 +52,31 @@ namještaj / ); - my $chronology = Arh::Model::Chronology->new(current_user => $system_user); - $chronology->create( + my $chronology_8 = Arh::Model::Chronology->new(current_user => $system_user); + $chronology_8->create( + name => '8. stoljeće', + year_from => 701, + year_to => 800, + ); + my $chronology_end8 = Arh::Model::Chronology->new(current_user => $system_user); + $chronology_end8->create( name => 'kraj 8. stoljeća', year_from => 760, year_to => 800, + part_of => $chronology_8, ); + my $material = Arh::Model::Material->new; $material->create( name => 'tvrdi vapnenac', ); + my $material2 = Arh::Model::Material->new; + $material2->create( + name => 'nepoznato', + ); + my $location = Arh::Model::Location->new; $location->create( name => 'Lapidarij u Balama', @@ -90,7 +103,7 @@ dimensions => 'visina kapitola 13,5 cm; ukupna visina: 14,5 cm; presjek 13,5x13,5x5cm; manji presjek 11cm', position => 'otkriveno cca 12m od istočne fasade crkve', description => 'Ukrašen u doljnjem dijelu astragalom. U dobrom stanju. Abakus ukrašen na klasičan način, astragal u dva pojasa. Pojasnica sa spojenim listovima.', - chronology => $chronology, + chronology => $chronology_end8, location => $location, ); @@ -99,6 +112,23 @@ unit => $unit, material => $material, ); + $um->create( + unit => $unit, + material => $material2, + ); + + $unit->create( + name => 'Staklo', + number => 'SMV - 42/60', + campaign => $campaign, + chronology => $chronology_8, + location => $location, + ); + + $um->create( + unit => $unit, + material => $material2, + ); } 1;