woops..

This commit was SVN r13482.

ompi/mca/pml/base/pml_base_select.c

@@ -48,14 +48,13 @@ int mca_pml_base_select(bool enable_progress_threads,
                         bool enable_mpi_threads)
 {
     int i, priority = 0, best_priority = 0;
-    bool skip_pml = false;
     opal_list_item_t *item = NULL;
     mca_base_component_list_item_t *cli = NULL;
     mca_pml_base_component_t *component = NULL, *best_component = NULL;
     mca_pml_base_module_t *module = NULL, *best_module = NULL;
     opal_list_t opened;
     opened_component_t *om = NULL;
-    
+    bool found_pml;
     /* Traverse the list of available components; call their init
        functions. */
 
@@ -68,20 +67,19 @@ int mca_pml_base_select(bool enable_progress_threads,
          item = opal_list_get_next(item) ) {
         cli = (mca_base_component_list_item_t *) item;
         component = (mca_pml_base_component_t *) cli->cli_component;
-        skip_pml = false;
         /* if there is an include list - item must be in the list to be included */
+        found_pml = false;
         for( i = 0; i < ompi_pointer_array_get_size(&mca_pml_base_pml); i++) { 
             if((strcmp(component->pmlm_version.mca_component_name, 
-                       (char *) ompi_pointer_array_get_item(&mca_pml_base_pml, i)) != 0)) {
+                       (char *) ompi_pointer_array_get_item(&mca_pml_base_pml, i)) == 0)) {
+                found_pml = true;
+            }
+        }
+        if(!found_pml && ompi_pointer_array_get_size(&mca_pml_base_pml)) { 
             opal_output_verbose( 10, mca_pml_base_output,
                                      "select: component %s not in the include list",
                                      component->pmlm_version.mca_component_name );
-                skip_pml = true;
+                
-            } else { 
-                skip_pml = false;
-            }
-        }
-        if(skip_pml) { 
             continue;
         }
         if (NULL == component->pmlm_init) {