From 1546be5777d3645575584f185e34212346353f4d Mon Sep 17 00:00:00 2001 From: Daniel Kahn Gillmor Date: Fri, 29 Oct 2010 20:46:32 -0400 Subject: [PATCH] update the process table, where supported, to indicate just what the upgrade monitoring process is doing --- Crypt/Monkeysphere/MSVA/Monitor.pm | 2 ++ 1 file changed, 2 insertions(+) diff --git a/Crypt/Monkeysphere/MSVA/Monitor.pm b/Crypt/Monkeysphere/MSVA/Monitor.pm index 237e55b..693e61a 100644 --- a/Crypt/Monkeysphere/MSVA/Monitor.pm +++ b/Crypt/Monkeysphere/MSVA/Monitor.pm @@ -95,6 +95,8 @@ Would you like to restart the validation agent?"); sub childmain { my $self = shift; + $0 = 'MSVA (perl) Upgrade Monitor'; + $self->{files} = [ $0, values(%INC) ]; $self->{logger}->log('debug3', "setting up monitoring on these files:\n%s\n", join("\n", @{$self->{files}})); -- 2.26.2