--- tcltk-7.6_4.2/expect-5.22/exp_command.c.setpgrp	Tue Nov 26 01:26:07 1996
+++ tcltk-7.6_4.2/expect-5.22/exp_command.c	Fri Sep 27 10:15:54 2002
@@ -1192,7 +1192,7 @@
 #	include <sysv/sys.s>
 	syscall(SYS_setpgrp);
 #endif
-	setpgrp(0,0);
+	setpgid(0,0);
 /*	setpgrp(0,getpid());*/	/* make a new pgrp leader */
 
 /* Pyramid lacks this defn */
@@ -3125,7 +3125,7 @@
 #	include <sysv/sys.s>
 	syscall(SYS_setpgrp);
 #endif
-	setpgrp(0,0);
+	setpgid(0,0);
 /*	setpgrp(0,getpid());*/	/* put process in our own pgrp */
 
 /* Pyramid lacks this defn */