=head1 NAME
Interchange6::Schema::Populate::MessageType
=head1 DESCRIPTION
This module provides population capabilities for the MessageType schema
=cut
=head1 METHODS
=head2 populate_message_types
=cut
sub populate_message_types {
my $self = shift;
my @types = qw( blog_post order_comment product_review wiki_node );
my $rset = $self->schema->resultset('MessageType');
map { $rset->create({ name => $_ }) } @types;
}
1;