);
}
+has restarter_class => (
+ is => 'ro',
+ isa => Str,
+ lazy => 1,
+ default => sub {
+ my $self = shift;
+ Catalyst::Utils::env_value($self->application_name, 'RESTARTER') || 'Catalyst::Restarter';
+ }
+);
+
sub run {
my $self = shift;
# fail.
$| = 1 if $ENV{HARNESS_ACTIVE};
- require Catalyst::Restarter;
+ Catalyst::Utils::load_class($self->restarter_class);
- my $subclass = Catalyst::Restarter->pick_subclass;
+ my $subclass = $self->restarter_class->pick_subclass;
my $restarter = $subclass->new(
$self->_restarter_args()