#!/usr/bin/perl
#use Mooix::Thing;
#use Mooix::Root;
run sub {
	my $this=shift;
	%_=@_;
	my $oldversion=$_{oldversion} || $this->croak("missing oldversion");
	
	if (54 > $oldversion) {
		# shutdownlist used to have the heartbeat and
		# sessionmanager in it, until they moved to
		# sysshutdownlist. Remove them if they're in there.
		$this->shutdownlist->remove(object => $Mooix::Root->system->heartbeat);
		$this->shutdownlist->remove(object => $Mooix::Root->system->sessionmanager);
	}
	
	return $this->super(@_);
}
