From 90ebc36aa6231758f58169f50057bc56caaf322f Mon Sep 17 00:00:00 2001
From: Matthew Sackman <matthew@rabbitmq.com>
Date: Thu, 30 Sep 2010 13:08:00 +0100
Subject: Update format_status to work with gen_server2 state record

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

diff --git a/src/gen_server2.erl b/src/gen_server2.erl
index b0379b95..230d1f2a 100644
--- a/src/gen_server2.erl
+++ b/src/gen_server2.erl
@@ -1128,7 +1128,8 @@ function_exported_or_default(Mod, Fun, Arity, Default) ->
 %%-----------------------------------------------------------------
 format_status(Opt, StatusData) ->
     [PDict, SysState, Parent, Debug,
-     [Name, State, Mod, _Time, _TimeoutState, Queue]] = StatusData,
+     #gs2_state{name = Name, state = State, mod = Mod, queue = Queue}] =
+        StatusData,
     NameTag = if is_pid(Name) ->
                       pid_to_list(Name);
                  is_atom(Name) ->
-- 
cgit v1.2.1