my($class, @mw) = @_;
  $class->SUPER::ClassInit(@mw);
  my($self, @args) = @_;
  $self->SUPER::Populate(@args);