#!/usr/bin/perl
#use Mooix::Thing;
run sub {
	my $this=shift;
	%_=@_;
	my $oldversion=$_{oldversion} || $this->croak("missing oldversion");
	
	if (10 > $oldversion && $this->defines('nologin')) {
		# Enabled used to be called nologin.
		$this->enabled(! $this->nologin);
		unlink $this->fieldfile('nologin')
			|| warn "unlink nologin: $!";
	}
	return $this->super(@_);
}
