--- lib/Arh/Bootstrap.pm 2007/11/30 23:23:14 23 +++ lib/Arh/Bootstrap.pm 2008/04/06 11:12:58 39 @@ -88,6 +88,8 @@ name => 'mjesto iskapanja', ); +=for later + my $campaign = Arh::Model::Campaign->new(current_user => $system_user); $campaign->create( place => $place, @@ -99,8 +101,8 @@ my $unit = Arh::Model::Unit->new(current_user => $system_user); $unit->create( name => 'Mali kapitel stupića mnolitnog oltara', - inv_id => 'SMV - 96/60', - campaign => $campaign, + inventory_nr => 'SMV - 96/60', +# campaign => $campaign, dimensions => 'visina kapitola 13,5 cm; ukupna visina: 14,5 cm; presjek 13,5x13,5x5cm; manji presjek 11cm', discovered_at => '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.', @@ -120,7 +122,7 @@ $unit->create( name => 'Staklo', - inv_id => 'SMV - 42/60', + inventory_nr => 'SMV - 42/60', campaign => $campaign, chronology => $chronology_8, location => $location, @@ -130,6 +132,14 @@ unit => $unit, material => $material2, ); + +=cut + + my $cat = Arh::Model::Category->new; + $cat->create( name => $_ ) foreach ( qw/arhitektura skulptura slikarstvo liturgijske instalacije epigrafija metal/ ); + + my $cat = Arh::Model::Site->new; + $cat->create( name => $_ ) foreach ( qw/Pore Zagreb Sisak/ ); } 1;