Plug a file descriptor leak in the mom that occurs when jobs do not
start correctly.


---

 pbs-2.3.12-pw/src/resmom/mom_comm.c |    6 ++----
 1 files changed, 2 insertions(+), 4 deletions(-)

diff -puN src/resmom/mom_comm.c~mom-file-descriptor-leak src/resmom/mom_comm.c
--- pbs-2.3.12/src/resmom/mom_comm.c~mom-file-descriptor-leak	2004-04-17 11:00:35.000000000 -0400
+++ pbs-2.3.12-pw/src/resmom/mom_comm.c	2004-04-17 11:00:35.000000000 -0400
@@ -602,6 +602,7 @@ find_node(pjob, stream, nodeid)
 void
 job_start_error(job *pjob, int code, char *nodename)
 {
+	extern void exec_bail(job *pjob, int code);
 	static  char    id[] = "job_start_error";
 	int	nodes;
 
@@ -614,10 +615,7 @@ job_start_error(job *pjob, int code, cha
 			id, nodes, pjob->ji_numnodes-1);
 		log_err(-1, id, log_buffer);
 	}
-	pjob->ji_qs.ji_substate = JOB_SUBSTATE_EXITING;
-	pjob->ji_qs.ji_un.ji_momt.ji_exitstat = JOB_EXEC_RETRY;
-	exiting_tasks = 1;
-
+	exec_bail(pjob, JOB_EXEC_RETRY);
 	return;
 }
 

_