Report correct errno in case of multicast problem

diff --git a/orte/liborte/ORTEDomain.c b/orte/liborte/ORTEDomain.c
index b25a59a9d25eb92b841f64b57118f299affd1073..7a193437c46901c761cc67f6f79c3ff8605f0634 100644 (file)
--- a/orte/liborte/ORTEDomain.c
+++ b/orte/liborte/ORTEDomain.c
@@ -332,7 +332,8 @@ ORTEDomainCreate(int domain, ORTEDomainProp *prop,
          IP_ADD_MEMBERSHIP, (const char *)&mreq, sizeof(mreq))>=0) {
         debug(30,2) ("ORTEDomainCreate: joint to mgroup %s\n",
                       IPAddressToString(d->domainProp.multicast.ipAddress,sIPAddress));
-      }
+      } else
+             goto err_sock;
     }
     if (sock_bind(&d->taskRecvUnicastMetatraffic.sock,port,d->domainProp.listen) == -1) {
       goto err_sock;