From 44329c9989c0dcbd93da75d0623bf4044aab9597 Mon Sep 17 00:00:00 2001
From: JT Smith <jt@lacunaexpanse.com>
Date: Fri, 14 Jan 2011 19:21:43 -0600
Subject: [PATCH] Fixed instantly available spies when fetched from remote
 planet.

---
 lib/Lacuna/Role/Ship/Arrive/PickUpSpies.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib/Lacuna/Role/Ship/Arrive/PickUpSpies.pm b/lib/Lacuna/Role/Ship/Arrive/PickUpSpies.pm
index 64b9ceb2..750f6675 100644
--- a/lib/Lacuna/Role/Ship/Arrive/PickUpSpies.pm
+++ b/lib/Lacuna/Role/Ship/Arrive/PickUpSpies.pm
@@ -47,7 +47,8 @@ after handle_arrival_procedures => sub {
             object_id   => $self->id,
         })->insert;
         push @riding, $spy->id;
-        $spy->available_on($self->date_available);
+        my $duration = $self->date_available - $self->date_started;
+        $spy->available_on($self->date_available->clone->add_duration($duration));
         $spy->on_body_id($self->body_id);
         $spy->task('Travelling');
         $spy->started_assignment(DateTime->now),
-- 
2.51.2