--- a/core/s2smanager.lua	Wed Dec 22 20:39:30 2010 +0000
+++ b/core/s2smanager.lua	Fri Dec 24 04:47:18 2010 +0000
@@ -555,7 +555,7 @@
 		filter = function (type, data) return data; end;
 	}; resting_session.__index = resting_session;
 
-function retire_session(session)
+function retire_session(session, reason)
 	local log = session.log or log;
 	for k in pairs(session) do
 		if k ~= "trace" and k ~= "log" and k ~= "id" then
@@ -563,6 +563,8 @@
 		end
 	end
 
+	session.destruction_reason = reason;
+
 	function session.send(data) log("debug", "Discarding data sent to resting session: %s", tostring(data)); end
 	function session.data(data) log("debug", "Discarding data received from resting session: %s", tostring(data)); end
 	return setmetatable(session, resting_session);