Index: Tools/impl/MoveHelper.cls.xml
===================================================================
diff -u -r2704 -r2831
--- Tools/impl/MoveHelper.cls.xml	(.../MoveHelper.cls.xml)	(revision 2704)
+++ Tools/impl/MoveHelper.cls.xml	(.../MoveHelper.cls.xml)	(revision 2831)
@@ -63,6 +63,7 @@
 <Implementation><![CDATA[
 	Set ..svnHelper = ##class(svn.Helper).%New()
 	Set ..ZoekOpPrefix = ZoekOpPrefix
+	Set ..RoutinesToSave = ##class(%ArrayOfObjects).%New()
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -372,7 +373,6 @@
 <Method name="ControleerRoutines">
 <Private>1</Private>
 <Implementation><![CDATA[
-	Set RoutinesToSave = ##class(%ArrayOfObjects).%New()
 	set rsRoutine = ##class(%ResultSet).%New("%Routine:RoutineList")
 	do rsRoutine.Execute("*.mac")
 	while rsRoutine.Next() {
@@ -385,7 +385,7 @@
 			set ..Berichten(rsRoutine.Get("Name"))=##class(%ListOfDataTypes).%New()
 			Do ..Berichten(rsRoutine.Get("Name")).Insert(AantalWijzigingen_" keer gebruikt")
 			Do ..Commands.Insert(##class(Tools.impl.RenameRoutineCommand).%New(Lijnen, rsRoutine.Get("Name")))
-			Do RoutinesToSave.SetAt(rsRoutine.Get("Name"),rsRoutine.Get("Name"))
+			Do ..RoutinesToSave.SetAt(rsRoutine.Get("Name"),rsRoutine.Get("Name"))
 		}
 	}
 ]]></Implementation>