diff --git a/lib/Lacuna/DB/Result/Map/Body/Planet/Station.pm b/lib/Lacuna/DB/Result/Map/Body/Planet/Station.pm index bd530d4e..12833b0e 100644 --- a/lib/Lacuna/DB/Result/Map/Body/Planet/Station.pm +++ b/lib/Lacuna/DB/Result/Map/Body/Planet/Station.pm @@ -228,7 +228,7 @@ sub update_influence { WHERE s.id = si.star_id AND - pow(pow(x - ?, 2) + pow(y - ?, 2), 0.5) > ? + pow(pow(x - ?, 2) + pow(y - ?, 2), 0.5) >= ? ) EOSQL $sth->execute( diff --git a/lib/Lacuna/Role/Influencer.pm b/lib/Lacuna/Role/Influencer.pm index 3e98c9b1..eaedf593 100644 --- a/lib/Lacuna/Role/Influencer.pm +++ b/lib/Lacuna/Role/Influencer.pm @@ -2,12 +2,12 @@ package Lacuna::Role::Influencer; use Moose::Role; -before demolish => sub { +after demolish => sub { my $self = shift; $self->body->update_influence; }; -before downgrade => sub { +after downgrade => sub { my $self = shift; $self->body->update_influence; };