--- ag_background 2007-11-14 20:43:49.000000000 +0000 +++ /usr/lib/YaST2/servers_non_y2/ag_background 2008-01-22 13:40:33.000000000 +0000 @@ -75,6 +75,23 @@ } } +# send specified SIG to running subprocess +sub SigSubprocess($) +{ + + my ($sig) = @_; + + if ($child_running) + { + kill($sig, $child_pid); # send SIG + return 1; + } + else + { + return 0; + } +} + sub ErrorPath($) { my ($p) = @_; @@ -202,6 +219,10 @@ { ycp::Return(KillSubprocess() ? 'true' : 'false'); } + elsif ($path eq '.sig') + { + ycp::Return(SigSubprocess("$arg") ? 'true' : 'false'); + } else { ErrorPath($path);