replace call to setpgrp with setpgid, as setpgrp is defined different on OS X Tiger
authorMichael Gernoth <michael@gernoth.net>
Tue, 15 Jan 2008 17:26:20 +0000 (18:26 +0100)
committerMichael Gernoth <michael@gernoth.net>
Tue, 15 Jan 2008 17:26:20 +0000 (18:26 +0100)
src/tclx/src/tclxid.c

index b23d7bb..730c4ef 100644 (file)
@@ -239,7 +239,7 @@ Tcl_IdCmd (clientData, interp, argc, argv)
                                   " process group [set]", (char *) NULL);
                 return TCL_ERROR;
             }
-            setpgrp ();
+            setpgid(getpid(), getpid());
             return TCL_OK;
         }
         Tcl_AppendResult (interp, tclXWrongArgs, argv [0], 
Impressum, Datenschutz