--- a/util/sasl.lua	Thu Nov 26 17:17:54 2009 +0000
+++ b/util/sasl.lua	Thu Nov 26 23:11:02 2009 +0100
@@ -90,6 +90,11 @@
 	return s;
 end
 
+-- get a fresh clone with the same realm, profiles and forbidden mechanisms
+function method:clean_clone()
+	return new(self.realm, self.profile, self:forbidden())
+end
+
 -- set the forbidden mechanisms
 function method:forbidden( restrict )
 	if restrict then