From a1b70c69c2baa09d1bd44c17b88b16d6489e7f28 Mon Sep 17 00:00:00 2001
From: Mark Lemming <lemming@quirkyqatz.com>
Date: Tue, 26 Nov 2013 10:54:34 -0700
Subject: [PATCH] Adding empire name so people can be mourned.

---
 bin/tick_fissures.pl                       | 12 +++++++++++-
 var/messages/fissure_collateral_damage.txt |  2 +-
 var/www/public/changes.txt                 |  4 +++-
 3 files changed, 15 insertions(+), 3 deletions(-)

diff --git a/bin/tick_fissures.pl b/bin/tick_fissures.pl
index d7641961..9d085449 100644
--- a/bin/tick_fissures.pl
+++ b/bin/tick_fissures.pl
@@ -308,8 +308,10 @@ sub fissure_level {
 sub fissure_explode {
     my ($body) = @_;
 # If it is an empire.
+    my $ename;
     if ($body->empire_id) {
         my $empire = $body->empire;
+        $ename = $empire->name;
 
 # If it is the empires home world
         if ($body->id == $empire->home_planet_id) {
@@ -473,11 +475,19 @@ sub fissure_explode {
         $to_damage->needs_recalc(1);
         $to_damage->needs_surface_refresh(1);
         $to_damage->tick;
+
+        my $outrage;
+        if ($ename) {
+            $outrage = sprintf("We currently investigating why %s let this happen to their people.", $ename);
+        }
+        else {
+            $outrage = "Local empires are investigating who is responsible for this outrage."
+        }
                 
         $to_damage->empire->send_predefined_message(
             tags        => ['Colonization','Alert', 'Fissure'],
             filename    => 'fissure_collateral_damage.txt',
-            params      => [$body->name, $to_damage->name],
+            params      => [$body->name, $to_damage->name, $outrage],
         );
         if (++$damaged == 10) {
             last DAMAGED;
diff --git a/var/messages/fissure_collateral_damage.txt b/var/messages/fissure_collateral_damage.txt
index c1f18b65..9098a602 100644
--- a/var/messages/fissure_collateral_damage.txt
+++ b/var/messages/fissure_collateral_damage.txt
@@ -2,7 +2,7 @@ Fissure causes destruction
 ~~~
 The collapse of the Fissure Containment System on %s sent out a sub-ether shock-wave resulting in damage to many planets including %s.
 
-Local empires are investigating who is responsible for this outrage.
+%s
 
 Regards,
 
diff --git a/var/www/public/changes.txt b/var/www/public/changes.txt
index 7bcd7060..4a960b54 100644
--- a/var/www/public/changes.txt
+++ b/var/www/public/changes.txt
@@ -1,10 +1,12 @@
 3.0895:
  - Fix: Bad error message when not enough glyphs for a mission fixed.
  - Fix: Fetch Spies exploit filled in.
- - Add: BHG Sabotage option available
+ - Add: BHG Sabotage option available.
  - Add: Date Landed returned from excavation sites.
  - Fix: All spies in training on a planet are executed on new management.
  - Mod: Uni level also determines top production levels.
+ - Fix: SS Modules drop a level if at 0% for any reason.
+ - Add: Empire named in exploding planets.
 
 3.0894:
  - API: repair_list checks number of fed building ids, rejection of call if over max building count.
-- 
2.51.2