From e30bdaa509426676fa451d26a60e63da65703005 Mon Sep 17 00:00:00 2001
From: Tim Woodall <twoodall@lanl.gov>
Date: Fri, 13 Feb 2004 14:47:01 +0000
Subject: [PATCH] corrected proc list

This commit was SVN r777.
---
 src/mpi/proc/proc.c | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

diff --git a/src/mpi/proc/proc.c b/src/mpi/proc/proc.c
index a1ae3a706e..0004c2c4df 100644
--- a/src/mpi/proc/proc.c
+++ b/src/mpi/proc/proc.c
@@ -63,9 +63,6 @@ int lam_proc_init(void)
         return LAM_ERROR;
     }
 
-    lam_proc_local_proc = OBJ_NEW(lam_proc_t);
-    lam_proc_local_proc->proc_job = strdup(local->job_handle);
-    lam_proc_local_proc->proc_vpid = local->vpid;
     if(LAM_SUCCESS != (rc = mca_pcm.pcm_proc_get_peers(&procs, &nprocs))) {
         lam_output(0, "lam_proc_init: pcm_proc_get_peers failed with errno=%d", rc);
         return rc;
@@ -73,9 +70,13 @@ int lam_proc_init(void)
     lam_output(0, "lam_proc_init: pcm_proc_get_peers returned %d peers", nprocs);
 
     for(i=0; i<nprocs; i++) {
+        lam_job_handle_t job = procs[i].job_handle;
+        uint32_t vpid = procs[i].vpid;
         lam_proc_t *proc = OBJ_NEW(lam_proc_t);
-        proc->proc_job = strdup(procs[i].job_handle);
-        proc->proc_vpid = procs[i].vpid;
+        proc->proc_job = strdup(job);
+        proc->proc_vpid = vpid;
+        if(proc->proc_vpid == vpid && strcmp(proc->proc_job, job))
+            lam_proc_local_proc = proc;
     }
     free(procs);
     return LAM_SUCCESS;