diff --git a/lib/Lacuna/DB/Result/Empire.pm b/lib/Lacuna/DB/Result/Empire.pm
index 74a71c89..0d122ade 100644
--- a/lib/Lacuna/DB/Result/Empire.pm
+++ b/lib/Lacuna/DB/Result/Empire.pm
@@ -483,7 +483,7 @@ sub found {
   # found home planet
   $home_planet ||= $self->find_home_planet;
   my $current_tutorial_stage = $self->tutorial_stage;
-  unless ($current_tutorial_stage) {
+  if ($current_tutorial_stage eq 'explore_the_ui') {
     $self->tutorial_scratch($home_planet->name);
   }
   $self->home_planet_id($home_planet->id);
@@ -526,7 +526,7 @@ sub found {
   $home_planet->found_colony($self);
 
   # send welcome
-  unless ($current_tutorial_stage) {
+  if ($current_tutorial_stage eq 'explore_the_ui') {
     return Lacuna::Tutorial->new(empire=>$self)->start('explore_the_ui');
   }
   return 1;
diff --git a/lib/Lacuna/DB/Result/Map/Body.pm b/lib/Lacuna/DB/Result/Map/Body.pm
index f82344e1..99140822 100644
--- a/lib/Lacuna/DB/Result/Map/Body.pm
+++ b/lib/Lacuna/DB/Result/Map/Body.pm
@@ -126,6 +126,8 @@ __PACKAGE__->add_columns(
     plots_available                 => { data_type => 'tinyint', default_value => 0 },    
     surface_version                 => { data_type => 'tinyint', default_value => 0 },
     max_berth                       => { data_type => 'tinyint', default_value => 1 },
+    depression                      => { data_type => 'datetime', is_nullable => 0, set_on_create => 1 },
+    depressed                       => { data_type => 'tinyint', default_value => 0 },
 );
 
 after 'sqlt_deploy_hook' => sub {
diff --git a/lib/Lacuna/DB/Result/Spies.pm b/lib/Lacuna/DB/Result/Spies.pm
index 77aa5ecf..21e93553 100644
--- a/lib/Lacuna/DB/Result/Spies.pm
+++ b/lib/Lacuna/DB/Result/Spies.pm
@@ -43,6 +43,7 @@ __PACKAGE__->add_columns(
     politics_xp             => { data_type => 'int', default_value => 0 },
     theft_xp                => { data_type => 'int', default_value => 0 },
     level                   => { data_type => 'tinyint', default_value => 0 },
+    next_task               => { data_type => 'varchar', size => 30, is_nullable => 0, default_value => 'Idle' },
 );
 
 __PACKAGE__->belongs_to('empire', 'Lacuna::DB::Result::Empire', 'empire_id');
diff --git a/var/upgrades/3.0873.sql b/var/upgrades/3.0873.sql
index 4388b1a0..63c1923e 100644
--- a/var/upgrades/3.0873.sql
+++ b/var/upgrades/3.0873.sql
@@ -1,3 +1,3 @@
 alter table body  add column `depression` datetime NOT NULL default '2012-11-10 04:00:00';
-alter table body  add column `depressed` datetime NOT NULL default '2012-11-10 04:00:00';
+alter table body  add column `depressed` tinyint(4) not null default 0,
 alter table spies add column next_task varchar(30) NOT NULL defualt 'Idle';
diff --git a/var/www/public/changes.txt b/var/www/public/changes.txt
index f3248715..0d03d9ba 100644
--- a/var/www/public/changes.txt
+++ b/var/www/public/changes.txt
@@ -10,6 +10,8 @@
  - Fix: Happiness initialized to zero on new colonies.
  - Add: BHG can now jump a body to a different zone.
  - Add: BHG can exchange an entire system of bodies with another system.
+ - Add: Every occupied body that gets moved by a BHG generates an email.
+ - Add: BHG calibrated to be able to change asteroid types.
 
 3.0872:
  - Fix: Spies need working infrastructure.