From e6bc16a40c80ac7f0833a39e76199fe7e4176ac7 Mon Sep 17 00:00:00 2001
From: Simon MacMullen <simon@rabbitmq.com>
Date: Mon, 12 May 2014 16:35:50 +0100
Subject: Fix broken invocation.

---
 src/gm.erl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/gm.erl b/src/gm.erl
index 0c0ac349..fb59b9cb 100644
--- a/src/gm.erl
+++ b/src/gm.erl
@@ -1036,7 +1036,8 @@ join_group(Self, GroupName, #gm_group { members = Members } = Group, TxnFun) ->
             case lists:filter(fun is_member_alive/1, Members) of
                 [] ->
                     join_group(Self, GroupName,
-                               prune_or_create_group(Self, GroupName, TxnFun));
+                               prune_or_create_group(Self, GroupName, TxnFun),
+                               TxnFun);
                 Alive ->
                     Left = lists:nth(random:uniform(length(Alive)), Alive),
                     Handler =
-- 
cgit v1.2.1