Index: TECH/Persistent.cls.xml
===================================================================
diff -u -r432 -r466
--- TECH/Persistent.cls.xml	(.../Persistent.cls.xml)	(revision 432)
+++ TECH/Persistent.cls.xml	(.../Persistent.cls.xml)	(revision 466)
@@ -35,6 +35,7 @@
 	
 	#dim Status As %Status = ..%Save()
 	If ($$$ISERR(Status))	{
+		If ($$ParseStatus^vhLib(Status) [ "TECH.ExceptionHandler") Do ##class(TECH.ExceptionHandler).Rethrow()
 		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.SaveFailedException).%New("Kon object van type "_..%ClassName(1)_" niet opslaan",Status))
 	}
 	Quit Status