From 303b303bcf87db0a21db8f3b2626c23637778049 Mon Sep 17 00:00:00 2001
From: Mark Lemming <lemming@quirkyqatz.com>
Date: Mon, 23 Feb 2015 15:51:44 -0700
Subject: [PATCH] bleed until dry

---
 lib/Lacuna/DB/Result/Building.pm | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/lib/Lacuna/DB/Result/Building.pm b/lib/Lacuna/DB/Result/Building.pm
index 07eef8da..2655708f 100755
--- a/lib/Lacuna/DB/Result/Building.pm
+++ b/lib/Lacuna/DB/Result/Building.pm
@@ -913,8 +913,13 @@ sub start_upgrade {
     }
 
     my $time_to_add;
-    if ($body->isa('Lacuna::DB::Result::Map::Body::Planet::Station') and $self->class ne 'Lacuna::DB::Result::Building::DeployedBleeder') {
-        $time_to_add = 60 * 60 * 72;
+    if ($body->isa('Lacuna::DB::Result::Map::Body::Planet::Station') ) {
+        if ($self->class eq 'Lacuna::DB::Result::Building::DeployedBleeder') {
+            $time_to_add = $cost->{time};
+        }
+        else {
+            $time_to_add = 60 * 60 * 72;
+        }
     }
     else {
         $time_to_add = $cost->{time};
-- 
2.51.2