#!/usr/bin/perl
#use Mooix::Thing;
#use Mooix::Root;
run sub {
	my $this=shift;

	# Register with the heartbeat.
	$this->item($Mooix::Root->system->heartbeat->add(
		object => $this,
		method => "event",
		interval => int($this->_interval),
		date => int($this->_date),
		startdate => int($this->startdate),
		enddate => int($this->_enddate),
		probability => $this->_probability,
	));
	
	$this->super(@_);
}
