documentation => q{Force debug mode},
);
+has trace => (
+ traits => [qw(Getopt)],
+ cmd_aliases => 'd',
+ isa => 'Integer',
+ is => 'ro',
+ documentation => q{Force trace mode},
+);
+
has host => (
traits => [qw(Getopt)],
cmd_aliases => 'h',
my ($success, $error) = try_load_class("MooseX::Daemonize::Core");
warn("MooseX::Daemonize is needed for the --background option: $error\n"),
exit 1 if not $success;
- my ($success, $error) = try_load_class("POSIX");
+ ($success, $error) = try_load_class("POSIX");
warn("$error\n"), exit 1 if not $success;
MooseX::Daemonize::Core->meta->apply($self);
POSIX::close($_) foreach (0..2);
local $ENV{CATALYST_DEBUG} = 1
if $self->debug;
+ local $ENV{CATALYST_TRACE} = $self->trace
+ if $self->trace;
+
if ( $self->restart ) {
die "Cannot run in the background and also watch for changed files.\n"
if $self->background;