diff --git a/docs/LibraryOfJith.pod b/docs/LibraryOfJith.pod index aea9dc6c..3f508e90 100644 --- a/docs/LibraryOfJith.pod +++ b/docs/LibraryOfJith.pod @@ -1,6 +1,6 @@ -=head1 Algae Methods +=head1 Library of Jith Methods -Algae is accessible via the URL C. +Library of Jith is accessible via the URL C. The list of methods below represents changes and additions to the methods that all L share. diff --git a/docs/MassadsHenge.pod b/docs/MassadsHenge.pod index aea9dc6c..c5bb9c50 100644 --- a/docs/MassadsHenge.pod +++ b/docs/MassadsHenge.pod @@ -1,6 +1,6 @@ -=head1 Algae Methods +=head1 Massad's Henge Methods -Algae is accessible via the URL C. +Massad's Henge is accessible via the URL C. The list of methods below represents changes and additions to the methods that all L share. diff --git a/docs/OracleOfAnid.pod b/docs/OracleOfAnid.pod index aea9dc6c..33104343 100644 --- a/docs/OracleOfAnid.pod +++ b/docs/OracleOfAnid.pod @@ -1,6 +1,6 @@ -=head1 Algae Methods +=head1 Oracle of Anid Methods -Algae is accessible via the URL C. +Oracle of Anid is accessible via the URL C. The list of methods below represents changes and additions to the methods that all L share. diff --git a/lib/Lacuna/DB/Result/Building/Permanent/LibraryOfJith.pm b/lib/Lacuna/DB/Result/Building/Permanent/LibraryOfJith.pm index 90dde0df..71790579 100644 --- a/lib/Lacuna/DB/Result/Building/Permanent/LibraryOfJith.pm +++ b/lib/Lacuna/DB/Result/Building/Permanent/LibraryOfJith.pm @@ -1,26 +1,25 @@ -package Lacuna::DB::Result::Building::Permanent::AlgaePond; +package Lacuna::DB::Result::Building::Permanent::LibraryOfJith; use Moose; use utf8; no warnings qw(uninitialized); extends 'Lacuna::DB::Result::Building::Permanent'; -use Lacuna::Util qw(randint); -use constant controller_class => 'Lacuna::RPC::Building::AlgaePond'; +use constant controller_class => 'Lacuna::RPC::Building::LibraryOfJith'; around can_build => sub { my ($orig, $self, $body) = @_; if ($body->get_plan(__PACKAGE__, 1)) { return $orig->($self, $body); } - confess [1013,"You can't build an Algae Pond. It forms naturally."]; + confess [1013,"You can't build the Library of Jith."]; }; sub can_upgrade { - confess [1013, "You can't upgrade an Algae Pond. It forms naturally."]; + confess [1013, "You can't upgrade the Library of Jith."]; } -use constant image => 'algaepond'; +use constant image => 'libraryjith'; sub image_level { my ($self) = @_; @@ -29,20 +28,13 @@ sub image_level { after finish_upgrade => sub { my $self = shift; - $self->body->add_news(30, sprintf('This is no fisherman\'s tale. A local fisherman caught a '.randint(1,9).' meter Rakl out of an algae pond on %s.', $self->body->name)); + $self->body->add_news(30, sprintf('Scientists on %s have unlocked the secrets of the origin of species.', $self->body->name)); }; -use constant name => 'Algae Pond'; +use constant name => 'Library of Jith'; use constant time_to_build => 0; use constant max_instances_per_planet => 1; -use constant algae_production => 4000; -around produces_food_items => sub { - my ($orig, $class) = @_; - my $foods = $orig->($class); - push @{$foods}, qw(algae); - return $foods; -}; no Moose; __PACKAGE__->meta->make_immutable(inline_constructor => 0); diff --git a/lib/Lacuna/DB/Result/Building/Permanent/MassadsHenge.pm b/lib/Lacuna/DB/Result/Building/Permanent/MassadsHenge.pm index 90dde0df..6309bd78 100644 --- a/lib/Lacuna/DB/Result/Building/Permanent/MassadsHenge.pm +++ b/lib/Lacuna/DB/Result/Building/Permanent/MassadsHenge.pm @@ -1,4 +1,4 @@ -package Lacuna::DB::Result::Building::Permanent::AlgaePond; +package Lacuna::DB::Result::Building::Permanent::MassadsHenge; use Moose; use utf8; @@ -6,21 +6,21 @@ no warnings qw(uninitialized); extends 'Lacuna::DB::Result::Building::Permanent'; use Lacuna::Util qw(randint); -use constant controller_class => 'Lacuna::RPC::Building::AlgaePond'; +use constant controller_class => 'Lacuna::RPC::Building::MassadsHenge'; around can_build => sub { my ($orig, $self, $body) = @_; if ($body->get_plan(__PACKAGE__, 1)) { return $orig->($self, $body); } - confess [1013,"You can't build an Algae Pond. It forms naturally."]; + confess [1013,"You can't build Massad's Henge."]; }; sub can_upgrade { - confess [1013, "You can't upgrade an Algae Pond. It forms naturally."]; + confess [1013, "You can't upgrade Massad's Henge."]; } -use constant image => 'algaepond'; +use constant image => 'massadshenge'; sub image_level { my ($self) = @_; @@ -29,20 +29,12 @@ sub image_level { after finish_upgrade => sub { my $self = shift; - $self->body->add_news(30, sprintf('This is no fisherman\'s tale. A local fisherman caught a '.randint(1,9).' meter Rakl out of an algae pond on %s.', $self->body->name)); + $self->body->add_news(30, sprintf('The whole of the heavens are exposed to the citizens of %s.', $self->body->name)); }; -use constant name => 'Algae Pond'; +use constant name => 'Massad\'s Henge'; use constant time_to_build => 0; use constant max_instances_per_planet => 1; -use constant algae_production => 4000; - -around produces_food_items => sub { - my ($orig, $class) = @_; - my $foods = $orig->($class); - push @{$foods}, qw(algae); - return $foods; -}; no Moose; __PACKAGE__->meta->make_immutable(inline_constructor => 0); diff --git a/lib/Lacuna/DB/Result/Building/Permanent/OracleOfAnid.pm b/lib/Lacuna/DB/Result/Building/Permanent/OracleOfAnid.pm index 90dde0df..1c6f9ece 100644 --- a/lib/Lacuna/DB/Result/Building/Permanent/OracleOfAnid.pm +++ b/lib/Lacuna/DB/Result/Building/Permanent/OracleOfAnid.pm @@ -1,26 +1,25 @@ -package Lacuna::DB::Result::Building::Permanent::AlgaePond; +package Lacuna::DB::Result::Building::Permanent::OracleOfAnid; use Moose; use utf8; no warnings qw(uninitialized); extends 'Lacuna::DB::Result::Building::Permanent'; -use Lacuna::Util qw(randint); -use constant controller_class => 'Lacuna::RPC::Building::AlgaePond'; +use constant controller_class => 'Lacuna::RPC::Building::OracleOfAnid'; around can_build => sub { my ($orig, $self, $body) = @_; if ($body->get_plan(__PACKAGE__, 1)) { return $orig->($self, $body); } - confess [1013,"You can't build an Algae Pond. It forms naturally."]; + confess [1013,"You can't build the Oracle of Anid."]; }; sub can_upgrade { - confess [1013, "You can't upgrade an Algae Pond. It forms naturally."]; + confess [1013, "You can't upgrade the Oracle of Anid."]; } -use constant image => 'algaepond'; +use constant image => 'oracleanid'; sub image_level { my ($self) = @_; @@ -29,20 +28,13 @@ sub image_level { after finish_upgrade => sub { my $self = shift; - $self->body->add_news(30, sprintf('This is no fisherman\'s tale. A local fisherman caught a '.randint(1,9).' meter Rakl out of an algae pond on %s.', $self->body->name)); + $self->body->add_news(30, sprintf('A warning to all enemies foreign and domestic. The government of %s sees all.', $self->body->name)); }; -use constant name => 'Algae Pond'; +use constant name => 'Oracle of Anid'; use constant time_to_build => 0; use constant max_instances_per_planet => 1; -use constant algae_production => 4000; -around produces_food_items => sub { - my ($orig, $class) = @_; - my $foods = $orig->($class); - push @{$foods}, qw(algae); - return $foods; -}; no Moose; __PACKAGE__->meta->make_immutable(inline_constructor => 0); diff --git a/lib/Lacuna/RPC/Building/LibraryOfJith.pm b/lib/Lacuna/RPC/Building/LibraryOfJith.pm index b38ce333..994ecbb0 100644 --- a/lib/Lacuna/RPC/Building/LibraryOfJith.pm +++ b/lib/Lacuna/RPC/Building/LibraryOfJith.pm @@ -1,4 +1,4 @@ -package Lacuna::RPC::Building::AlgaePond; +package Lacuna::RPC::Building::LibraryOfJith; use Moose; use utf8; @@ -6,11 +6,11 @@ no warnings qw(uninitialized); extends 'Lacuna::RPC::Building'; sub app_url { - return '/algaepond'; + return '/libraryofjith'; } sub model_class { - return 'Lacuna::DB::Result::Building::Permanent::AlgaePond'; + return 'Lacuna::DB::Result::Building::Permanent::LibraryOfJith'; } no Moose; diff --git a/lib/Lacuna/RPC/Building/MassadsHenge.pm b/lib/Lacuna/RPC/Building/MassadsHenge.pm index b38ce333..4a1b66b2 100644 --- a/lib/Lacuna/RPC/Building/MassadsHenge.pm +++ b/lib/Lacuna/RPC/Building/MassadsHenge.pm @@ -1,4 +1,4 @@ -package Lacuna::RPC::Building::AlgaePond; +package Lacuna::RPC::Building::MassadsHenge; use Moose; use utf8; @@ -6,11 +6,11 @@ no warnings qw(uninitialized); extends 'Lacuna::RPC::Building'; sub app_url { - return '/algaepond'; + return '/massadshenge'; } sub model_class { - return 'Lacuna::DB::Result::Building::Permanent::AlgaePond'; + return 'Lacuna::DB::Result::Building::Permanent::MassadsHenge'; } no Moose; diff --git a/lib/Lacuna/RPC/Building/OracleOfAnid.pm b/lib/Lacuna/RPC/Building/OracleOfAnid.pm index b38ce333..6b1a170c 100644 --- a/lib/Lacuna/RPC/Building/OracleOfAnid.pm +++ b/lib/Lacuna/RPC/Building/OracleOfAnid.pm @@ -1,4 +1,4 @@ -package Lacuna::RPC::Building::AlgaePond; +package Lacuna::RPC::Building::OracleOfAnid; use Moose; use utf8; @@ -6,11 +6,11 @@ no warnings qw(uninitialized); extends 'Lacuna::RPC::Building'; sub app_url { - return '/algaepond'; + return '/oracleofanid'; } sub model_class { - return 'Lacuna::DB::Result::Building::Permanent::AlgaePond'; + return 'Lacuna::DB::Result::Building::Permanent::OracleOfAnid'; } no Moose;