# HG changeset patch
# User wenzelm
# Date 1203449668 -3600
# Node ID 783f957dcb012e0eab49d9ae22099ddc8eabac07
# Parent  04ee0a14a9f6ee55cd9900056b39bbda44aa3fe5
replaced setpgrp by more elaborate setsid;

diff -r 04ee0a14a9f6 -r 783f957dcb01 lib/scripts/system.pl
--- a/lib/scripts/system.pl	Tue Feb 19 12:25:56 2008 +0100
+++ b/lib/scripts/system.pl	Tue Feb 19 20:34:28 2008 +0100
@@ -12,7 +12,10 @@
 
 # process id
 
-if ($group eq "group") { setpgrp; }
+if ($group eq "group") {
+  use POSIX "setsid";
+  POSIX::setsid, "\n" || die $!;
+}
 
 open (PID_FILE, ">", $pid_name) || die $!;
 print PID_FILE "$$\n";