Index: svn/Repository.cls.xml
===================================================================
diff -u -r1759 -r1772
--- svn/Repository.cls.xml	(.../Repository.cls.xml)	(revision 1759)
+++ svn/Repository.cls.xml	(.../Repository.cls.xml)	(revision 1772)
@@ -170,7 +170,7 @@
 </Method>
 
 <Method name="SVNCommit">
-<FormalSpec>InternalName:%String,Message:%String,Username:%String,Password</FormalSpec>
+<FormalSpec>InternalName:%String,Message:%String,Username:%String,Password:%String</FormalSpec>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
 	set tCmd=##class(svn.Command).%New($lb(..WorkspacePath(..Branch)))
@@ -736,7 +736,7 @@
 	#dim DeleteNeeded As %Boolean = 0
 	if ##class(TECH.SourceCodeUtils).Exists(InternalName) {   
 		if '##class(%File).Exists(ExternalName) { 
-			set DeleteNeeded = ##class(svn.SourceCodeInfo).%ExistsId(InternalName)
+			set DeleteNeeded = 1
 		}
 	}
 	quit DeleteNeeded
@@ -757,9 +757,9 @@
 </Method>
 
 <Method name="FileList">
-<ReturnType>%ListOfDataTypes</ReturnType>
+<ReturnType>TECH.ListOfDataTypesOnDisk</ReturnType>
 <Implementation><![CDATA[
-	set List = ##class(%ListOfDataTypes).%New()
+	set List = ##class(TECH.ListOfDataTypesOnDisk).%New()
 	
 	set rsFilesOnDisk = ##class(%ResultSet).%New("TECH.Files:GetFiles")
 	do rsFilesOnDisk.Execute(..WorkspacePath(..Branch),"*.*")
@@ -769,7 +769,6 @@
 			do List.Insert(ExternalName)
 		} 
 	}
-	
 	quit List
 ]]></Implementation>
 </Method>