package My::Aliased;

use Badger::Class
    debug    => 0,
    base     => 'Badger::Base',
    alias    => {
        init => \&init_this,
        foo  => \&bar,
    };

sub init_this {
    my ($self, $config) = @_;
    $self->{ init_msg } = 'Hello World!';
    return $self;
}

sub bar {
    return "this is bar";
}

sub init_msg {
    shift->{ init_msg };
}

1;