Committer: vsukhanov
LJSUP-11008: Add type to worker's udp logsU trunk/cgi-bin/LJ/Worker/ErrorLog.pm
Modified: trunk/cgi-bin/LJ/Worker/ErrorLog.pm =================================================================== --- trunk/cgi-bin/LJ/Worker/ErrorLog.pm 2012-01-20 11:46:28 UTC (rev 20944) +++ trunk/cgi-bin/LJ/Worker/ErrorLog.pm 2012-01-20 12:13:56 UTC (rev 20945) @@ -64,7 +64,7 @@ my $now = time(); my $ltime = localtime($now); foreach my $k ( keys %{$self->{handles}} ) { - print { $self->{handles}->{$k} } $ltime, ': ', $str, ('stderr' eq $k ? "\n" : ""); + print { $self->{handles}->{$k} } 'ap_wrk:', $ltime, ': ', $str, ('stderr' eq $k ? "\n" : ""); } }