Index: APPS/VisiDot/impl/CleanUp.cls.xml
===================================================================
diff -u -r29059 -r32537
--- APPS/VisiDot/impl/CleanUp.cls.xml	(.../CleanUp.cls.xml)	(revision 29059)
+++ APPS/VisiDot/impl/CleanUp.cls.xml	(.../CleanUp.cls.xml)	(revision 32537)
@@ -20,7 +20,7 @@
 	#dim TijdstipVerwijder As %TimeStamp = ##class(TECH.DateTime).DateToTimeStamp(DatumVerwijder)
 	
 	Do ..CleanUpNotes01Archive(TijdstipVerwijder)
-	Do ..CleanUpVisiDotW7(TijdstipVerwijder)
+	Do ..CleanUpVisiDotServerFotos(TijdstipVerwijder)
 	
 	Quit $$$OK
 ]]></Implementation>
@@ -36,7 +36,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="CleanUpVisiDotW7">
+<Method name="CleanUpVisiDotServerFotos">
 <ClassMethod>1</ClassMethod>
 <FormalSpec>TijdstipVerwijder:%TimeStamp</FormalSpec>
 <Implementation><![CDATA[