From f3bdb3e87c460f50ca641e81fce5ad3b5d7f9b61 Mon Sep 17 00:00:00 2001
From: JT Smith <jt@lacunaexpanse.com>
Date: Sat, 1 Jan 2011 16:46:02 -0600
Subject: [PATCH] security sweep works

---
 lib/Lacuna/DB/Result/Spies.pm | 14 +++++++++++++-
 1 file changed, 13 insertions(+), 1 deletion(-)

diff --git a/lib/Lacuna/DB/Result/Spies.pm b/lib/Lacuna/DB/Result/Spies.pm
index b280d411..55de80df 100644
--- a/lib/Lacuna/DB/Result/Spies.pm
+++ b/lib/Lacuna/DB/Result/Spies.pm
@@ -496,7 +496,7 @@ sub run_security_sweep {
     else {
         my $message_id;
         if (defined $attacker) {
-            $message_id = $self->capture_a_spy($attacker)->id;
+            $message_id = $self->detain_a_spy($attacker)->id;
             $attacker->$mission_skill( $self->$mission_skill + 2);
             $attacker->update_level;
         }
@@ -624,6 +624,18 @@ sub capture_a_spy {
     return $prisoner->go_to_jail;
 }
 
+sub detain_a_spy {
+    my ($self, $prisoner) = @_;
+    $self->spies_captured( $self->spies_captured + 1 );
+    $prisoner->go_to_jail;
+    return $self->on_body->empire->send_predefined_message(
+        tags        => ['Intelligence'],
+        filename    => 'we_captured_a_spy.txt',
+        params      => [$self->on_body->x, $self->on_body->y, $self->on_body->name, $self->format_from($self->on_body->empire_id)],
+        from        => $self->empire,
+    );
+}
+
 sub format_from {
     my ($self, $empire_id) = @_;
     $empire_id ||= $self->empire_id;
-- 
2.51.2