Index: TECH/Concurrency/VhPersistent.cls.xml
===================================================================
diff -u -r2444 -r2449
--- TECH/Concurrency/VhPersistent.cls.xml	(.../VhPersistent.cls.xml)	(revision 2444)
+++ TECH/Concurrency/VhPersistent.cls.xml	(.../VhPersistent.cls.xml)	(revision 2449)
@@ -28,7 +28,7 @@
 	If (InstanceVersion '= -1){
 		Set ..InstanceVersion = InstanceVersion
 	}
-	Do ..OnDefineDependentConcurrency()
+	Do:..%IsModified() ..OnDefineDependentConcurrency()
 	Set Status = ##class(DbUtils).Save(##this)
 	If ($$$ISERR(Status))
 	{