From 445ba2bcdfb0d8a0ef731146f87ff0cdc00dec34 Mon Sep 17 00:00:00 2001
From: Mark Lemming <lemming@quirkyqatz.com>
Date: Sun, 14 Dec 2014 20:11:39 -0700
Subject: [PATCH] Fix vacation.

---
 bin/clean_up_empires.pl | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/bin/clean_up_empires.pl b/bin/clean_up_empires.pl
index 29d035ff..63098985 100644
--- a/bin/clean_up_empires.pl
+++ b/bin/clean_up_empires.pl
@@ -13,7 +13,7 @@ GetOptions(
     'quiet'         => \$quiet,  
 );
 
-out('Started');
+out('Started Clean Up Empires');
 my $start = DateTime->now;
 
 out('Loading DB');
@@ -41,6 +41,7 @@ my $to_be_deleted = $empires->search({ self_destruct_date => { '<' => $dtf->form
 my $delete_tally = 0;
 my $active_duration = 0;
 while (my $empire = $to_be_deleted->next) {
+    out('Deleting empire '.$empire->name);
     $delete_tally++;
     $active_duration += $start->epoch - $empire->date_created->epoch;
     $empire->delete;    
@@ -63,7 +64,7 @@ my $inactives = $empires->search({
     last_login           => { '<' => $dtf->format_datetime(DateTime->now->subtract( days => $inactivity_time_out) ) }, 
     self_destruct_active => 0, 
     id                   => { '>' => 1},
-    disable_self_destruct=> 0,
+#    disable_self_destruct=> 0,
 });
 while (my $empire = $inactives->next) {
     if ($empire->essentia >= 1) {
-- 
2.51.2