diff --git a/src/cmd/ksh93/sh/xec.c b/src/cmd/ksh93/sh/xec.c
index 124d8e54a..898f414c8 100644
--- a/src/cmd/ksh93/sh/xec.c
+++ b/src/cmd/ksh93/sh/xec.c
@@ -1991,6 +1991,7 @@ int sh_exec(register const Shnode_t *t, int flags)
 					_sh_fork(shp,pid,0,0);
 				if(pid==0)
 				{
+					shgd->current_pid = getpid();
 					sh_reseed_rand((struct rand*)RANDNOD->nvfun);
 					shgd->realsubshell++;
 					sh_exec(t->par.partre,flags);