From b88509af363ce423f9e359ef96d554d6cb754a32 Mon Sep 17 00:00:00 2001
From: Nathan Hjelm <hjelmn@lanl.gov>
Date: Wed, 17 Jul 2013 19:49:05 +0000
Subject: [PATCH] don't close components that failed to register.
 cmr:v1.7:reviewer=rhc

This commit was SVN r28823.
---
 opal/mca/base/mca_base_components_register.c | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/opal/mca/base/mca_base_components_register.c b/opal/mca/base/mca_base_components_register.c
index 835ca240d6..a892eb5ea5 100644
--- a/opal/mca/base/mca_base_components_register.c
+++ b/opal/mca/base/mca_base_components_register.c
@@ -142,7 +142,13 @@ static int register_components(const char *project_name, const char *type_name,
                                     component->mca_component_name);
             }
 
-            mca_base_component_close (component, output_id);
+            ret = mca_base_var_group_find (component->reserved, component->mca_type_name,
+                                           component->mca_component_name);
+            if (0 <= ret) {
+                mca_base_var_group_deregister (ret);
+            }
+
+            mca_base_component_repository_release((mca_base_component_t *) component);
 
             /* Release this list item */
             OBJ_RELEASE(cli);