package HollyGameAI::Moradin; our @ISA = "MutualExclusiveDeityAI"; sub Moradin { my $class = shift; my $self = $class->SUPER::MutualExclusiveDeityAI(qw(empower)); bless $self, ref($class) || $class; }