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

	# Object is already locked when this verb runs, since its command
	# limits it to being called on (touchable) objects. So no locking
	# needed before checking this field.
	if ($this->flying) {
		fail "It's flying and doesn't notice.";
	}
	else {
		$this->exec->super(@_);
	}
}
