Index: TECH/impl/FileUtils.cls.xml
===================================================================
diff -u -r912 -r1385
--- TECH/impl/FileUtils.cls.xml	(.../FileUtils.cls.xml)	(revision 912)
+++ TECH/impl/FileUtils.cls.xml	(.../FileUtils.cls.xml)	(revision 1385)
@@ -25,7 +25,7 @@
 </Method>
 
 <Method name="ZijnBestandenInMapGelijk">
-<FormalSpec>Map1:%String,Map2:%String</FormalSpec>
+<FormalSpec>Map1:%String,Map2:%String,Recursief:%Boolean=0</FormalSpec>
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[
 	Set Files = ##class(TECH.Files).%New()
@@ -36,7 +36,12 @@
 		Set FilesIterator = ##class(TECH.ListIterator).%New(FilesMap1)
 		While(FilesIterator.HasNext()) {
 			#dim Bestand As TECH.FileInfo = FilesIterator.Next()
-			#dim BestandsNaam As %String = ##class(TECH.File).%New().GeefBestandsnaam(Bestand.Name)
+			#dim BestandsNaam As %String 
+			If Recursief {
+				Set BestandsNaam = $Piece(Bestand.Name,Map1,2)
+			}Else{
+				Set BestandsNaam = ##class(TECH.File).%New().GeefBestandsnaam(Bestand.Name)
+			}
 			If '..ZijnBestandenGelijk(Map1_"\"_BestandsNaam, Map2_"\"_BestandsNaam) {
 				Set ZijnGelijk = 0
 			}