#!/usr/bin/perl
#use Mooix::Thing;
run sub {
	my $this=shift;
	
	# don't inherit flying field
	$this->flying(0);
	chmod(0664, $this->fieldfile('flying')) || die "chmod: $!";
	
	return $this->super(@_);
}
