Have DUP pass a preferred coll module when making the new

communicator. 

This commit was SVN r1696.

src/communicator/comm.c

@@ -127,7 +127,7 @@ ompi_communicator_t * ompi_comm_set ( ompi_communicator_t* oldcomm,
     /* Initialize the coll modules */
     /* Let the collectives modules fight over who will do
        collective on this new comm.  */
-    if (OMPI_ERROR == mca_coll_base_comm_select(newcomm, NULL)) {
+    if (OMPI_ERROR == mca_coll_base_comm_select(newcomm, collmodule)) {
 	goto err_exit;
     }
 

src/mpi/c/comm_dup.c

@@ -59,7 +59,7 @@ int MPI_Comm_dup(MPI_Comm comm, MPI_Comm *newcomm) {
                               rprocs,                                 /* remote_procs */
                               comp->c_keyhash,                        /* attrs */
                               comp->error_handler,                    /* error handler */
-                              NULL,                              /* coll module,t.b.d */
+                              (mca_base_module_t*) comp->c_coll_selected_module,           /* coll module,t.b.d */
                               NULL                              /* topo module, t.b.d */
                              );