From fe2bd1b2434b9115e7cda5c3576c76d2e02ba382 Mon Sep 17 00:00:00 2001
From: JT Smith <jt@lacunaexpanse.com>
Date: Sun, 14 Nov 2010 19:13:45 -0600
Subject: [PATCH] fixed downgrade problem

---
 lib/Lacuna/DB/Result/Building/Ore/Ministry.pm | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/lib/Lacuna/DB/Result/Building/Ore/Ministry.pm b/lib/Lacuna/DB/Result/Building/Ore/Ministry.pm
index 5dc33202..993fea04 100644
--- a/lib/Lacuna/DB/Result/Building/Ore/Ministry.pm
+++ b/lib/Lacuna/DB/Result/Building/Ore/Ministry.pm
@@ -142,11 +142,16 @@ after finish_upgrade => sub {
 
 before 'can_downgrade' => sub {
     my $self = shift;
-    if ($self->platforms->count > int(($self->level) / 2)) {
+    if ($self->platforms->count > int(($self->level - 1) / 2)) {
         confess [1013, 'You must abandon one of your Mining Platforms before you can downgrade the Mining Ministry.'];
     }
 };
 
+after 'downgrade' => sub {
+    my $self = shift;
+    $self->recalc_ore_production;
+};
+
 use constant controller_class => 'Lacuna::RPC::Building::MiningMinistry';
 
 use constant university_prereq => 12;
-- 
2.51.2