Index: svn/StudioHook.cls.xml
===================================================================
diff -u -r1575 -r1577
--- svn/StudioHook.cls.xml	(.../StudioHook.cls.xml)	(revision 1575)
+++ svn/StudioHook.cls.xml	(.../StudioHook.cls.xml)	(revision 1577)
@@ -78,7 +78,6 @@
 <MenuItem Name="GetLatest" />
 <MenuItem Name="Reload File" />
 <MenuItem Name="Synchronize Changes" />
-<MenuItem Name="Synchronize All" />
 <MenuItem Separator="1" Name="----------------------------------"/> 
 <MenuItem Name="Settings"/>
 <MenuItem Name="Dump Settings" />
@@ -93,6 +92,7 @@
 <UDLText name="T">
 <Content><![CDATA[
 /*
+	<MenuItem Name="Synchronize All" />
 	<MenuItem Name="Import namespace to Subversion" />
 	<MenuItem Name="Check Out" Save="100" />
 	<MenuItem Name="Synchronize" />
@@ -354,7 +354,7 @@
 	set Action=0
 	set ..Cmd=0
 	write "Synchronisatie van de wijzigingen wordt uitgevoerd ",!
-	do ##class(svn.Helper).%New(..Name,..Password).ShortSync()
+	do ##class(svn.Helper).%New(..Name,..Password).SynchronizeChanges()
 	write "Synchronisatie afgelopen",!
 ]]></Implementation>
 </Method>
@@ -987,7 +987,7 @@
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
 	if ..Debug Write !,"Method 'OnAfterLoad' InternalName:"_InternalName
-	set Repository = ..svnHelper.GeefRepository(InternalName)
+	#dim Repository As svn.Repository = ..svnHelper.GeefRepository(InternalName)
 	if $IsObject(Repository) {
 		do Repository.Status(InternalName)
 	}
Index: svn/Repository.cls.xml
===================================================================
diff -u -r1576 -r1577
--- svn/Repository.cls.xml	(.../Repository.cls.xml)	(revision 1576)
+++ svn/Repository.cls.xml	(.../Repository.cls.xml)	(revision 1577)
@@ -460,16 +460,58 @@
 ]]></Implementation>
 </Method>
 
+<Method name="SynchronizeChanges">
+<Implementation><![CDATA[
+	set svnCommand = ##class(svn.Command).%New($listbuild(..WorkspacePath(..Branch)))
+	set svnCommand.SubCommand="status"
+	set svnCommand.File = ..WorkspacePath(..Branch)
+	
+	do svnCommand.Execute()
+
+	set listExternalNames = ##class(%ListOfDataTypes).%New()
+	
+	set itResults = ##class(TECH.ListIterator).%New(svnCommand.Results)
+	while itResults.HasNext() {
+		#dim svnInfo As svn.CommandResult = itResults.Next()
+		#dim ExternalName As %String = svnInfo.ExternalName
+		if $length(svnInfo.Action) && $length(ExternalName) {
+			if $length(svnInfo.Action)="D" {
+				do ..SVNDelete(..InternalName(ExternalName),##class(TECH.File).DirectoryExists(ExternalName))		
+			} elseif svnInfo.Action'="X" {
+				if ##class(TECH.File).DirectoryExists(ExternalName) {
+					set itFiles = ##class(TECH.ListIterator).%New(##class(TECH.Files).%New().GetFileList(ExternalName,"*.*"))
+					while itFiles.HasNext() {
+						set ExternalName = itFiles.Next().Name
+						do listExternalNames.Insert(ExternalName)
+					}
+				} else {
+					do listExternalNames.Insert(ExternalName)
+				}
+			}
+		}
+	}
+	
+	if listExternalNames.Size > 0 {
+		write !
+		set itExternalNames = ##class(TECH.ListIterator).%New(listExternalNames)
+		while itExternalNames.HasNext() {
+			set ExternalName = itExternalNames.Next()
+			write ExternalName,!
+			do ..SVNImport(ExternalName)
+			do ..ToCompile.Insert(..InternalName(ExternalName))
+		}
+	}
+]]></Implementation>
+</Method>
+
 <Storage name="Default">
 <Type>%Library.CacheStorage</Type>
-<DataLocation>^svn.RepositoryD</DataLocation>
+<DataLocation>^SYS("SourceControl","SVN","Repositories")</DataLocation>
 <DefaultData>RepositoryDefaultData</DefaultData>
-<IdLocation>^svn.RepositoryD</IdLocation>
-<IndexLocation>^svn.RepositoryI</IndexLocation>
-<StreamLocation>^svn.RepositoryS</StreamLocation>
+<IdLocation>^SYS("Repositories")</IdLocation>
+<IndexLocation>^SYS("SourceControl","SVN","Indices")</IndexLocation>
+<StreamLocation>^SYS("SourceControl","SVN","Repositories")(</StreamLocation>
 <Data name="RepositoryDefaultData">
-<Structure>listnode</Structure>
-<Subscript/>
 <Value name="1">
 <Value>%%CLASSNAME</Value>
 </Value>
Index: svn/Repository/FileRepository.cls.xml
===================================================================
diff -u -r1570 -r1577
--- svn/Repository/FileRepository.cls.xml	(.../FileRepository.cls.xml)	(revision 1570)
+++ svn/Repository/FileRepository.cls.xml	(.../FileRepository.cls.xml)	(revision 1577)
@@ -15,6 +15,10 @@
 <Implementation><![CDATA[	quit
 ]]></Implementation>
 </Method>
+
+<Storage name="Default">
+<Type>%Library.CacheStorage</Type>
+</Storage>
 </Class>
 
 
Index: svn/Helper.cls.xml
===================================================================
diff -u -r1575 -r1577
--- svn/Helper.cls.xml	(.../Helper.cls.xml)	(revision 1575)
+++ svn/Helper.cls.xml	(.../Helper.cls.xml)	(revision 1577)
@@ -471,6 +471,21 @@
 ]]></Implementation>
 </Method>
 
+<Method name="SVNSynchronizeChanges">
+<Implementation><![CDATA[
+	set rsRepos = ##class(%ResultSet).%New("svn.Repository:Extent")
+	do rsRepos.Execute()
+	while rsRepos.Next() {
+		#dim Repo As svn.Repository = ..OpenRepository(rsRepos.Get("ID"))
+		do Repo.SynchronizeChanges()
+		do ##class(TECH.ListUtils).CopyListOfDataTypes(Repo.ToCompile,..ToCompile.List)
+ 	}
+
+ 	#define NoRecompile 0
+ 	do ..CompileImportedSourceCode($$$NoRecompile)
+]]></Implementation>
+</Method>
+
 <Method name="RemovePackageFromArray">
 <FormalSpec>arrInternalNames:%ArrayOfDataTypes,Package:%String</FormalSpec>
 <Implementation><![CDATA[