tweaked Hypnotoad log messages a little

mojolicious · Feb 25, 2012 · a10a63e · a10a63e
1 parent 6459f7f
commit a10a63e
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/lib/Mojo/Server/Daemon.pm b/lib/Mojo/Server/Daemon.pm
@@ -265,7 +265,7 @@ sub _listen {
 
   # Friendly message
   return if $self->silent;
-  $self->app->log->info("Server listening ($listen)");
+  $self->app->log->info(qq/Listening at "$listen"./);
   $listen =~ s|^(https?\://)\*|${1}127.0.0.1|i;
   say "Server available at $listen.";
 }

diff --git a/lib/Mojo/Server/Hypnotoad.pm b/lib/Mojo/Server/Hypnotoad.pm
@@ -287,7 +287,7 @@ sub _pid_file {
   return if -e (my $file = $self->{config}->{pid_file});
 
   # Create PID file
-  $self->{log}->info(qq/Storing PID $$ in "$file"./);
+  $self->{log}->info(qq/Creating PID file "$file"./);
   croak qq/Can't create PID file "$file": $!/
     unless my $pid = IO::File->new($file, '>', 0644);
   print $pid $$;
@@ -310,7 +310,7 @@ sub _reap {
   else {
     my $w = delete $self->{workers}->{$pid};
     $self->{log}->info("Worker $pid died unexpectedly, restarting.")
-      unless $w->{graceful} || $w->{force};
+      unless $w->{graceful} || $w->{force} || $self->{finished};
   }
 }