Fix two typos that prevented alps direct launch from working

This commit was SVN r28628.

opal/mca/db/pmi/db_pmi.c

@@ -196,7 +196,7 @@ static int store(const opal_identifier_t *uid,
                     }
                 }
                 if (!subbed) {
-                    ptr[k++] = str[i];
+                    ptr[k++] = str[n];
                 }
             }
             /* pass the result */

orte/mca/grpcomm/pmi/grpcomm_pmi_module.c

@@ -219,7 +219,7 @@ static int modex(orte_grpcomm_collective_t *coll)
         fields = opal_argv_split(cptr, ',');
         free(cptr);
         /* sanity check */
-        if (6 != opal_argv_count(fields)) {
+        if (4 > opal_argv_count(fields)) {
             ORTE_ERROR_LOG(ORTE_ERR_BAD_PARAM);
             opal_argv_free(fields);
             return ORTE_ERR_BAD_PARAM;