From: Daniel Kahn Gillmor Date: Sat, 30 Oct 2010 00:46:32 +0000 (-0400) Subject: update the process table, where supported, to indicate just what the upgrade monitori... X-Git-Tag: msva-perl_debian/0.6-1~3^2~3 X-Git-Url: http://git.tremily.us/?a=commitdiff_plain;h=1546be5777d3645575584f185e34212346353f4d;p=monkeysphere-validation-agent.git update the process table, where supported, to indicate just what the upgrade monitoring process is doing --- 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}}));