traits => [qw(Getopt)],
isa => Bool,
is => 'ro',
- cmd_aliases => 'd',
+ cmd_aliases => [qw/d detach/], # Eww, detach is here as we fucked it up.. Deliberately not documented
documentation => 'Daemonize (go into the background)',
);
documentation => 'Specify a number of child processes',
);
+has title => (
+ traits => [qw(Getopt)],
+ cmd_aliases => 't',
+ isa => Str,
+ is => 'ro',
+ documentation => 'Set the process title',
+);
+
sub _application_args {
my ($self) = shift;
return (
manager => $self->manager,
detach => $self->daemon,
keep_stderr => $self->keeperr,
+ title => $self->title,
}
);
}
or empty string to disable
-e --keeperr send error messages to STDOUT, not
to the webserver
+ -t --title set the process title
=head1 DESCRIPTION