Index: TECH/Files.cls.xml =================================================================== diff -u -r3500 -r3581 --- TECH/Files.cls.xml (.../Files.cls.xml) (revision 3500) +++ TECH/Files.cls.xml (.../Files.cls.xml) (revision 3581) @@ -113,6 +113,7 @@ while (rset.Next() & ContinueLoop) { if (..List.Count() < NumberOfFiles) || (NumberOfFiles = 0 ) { #dim FullName as %String = ..AppendFile(Directory,rset.GetDataByName("ItemName")) + Continue:(FullName[".svn\pristine") // Er lijken nog erg veel (hidden) pristine-files op svn te zitten, die de lijst hier te lang maken, waardoor GetFileList crasht if (rset.GetDataByName("Type") = "D") { #dim SubDirectory as %String = FullName if AddSubDir Do ..GetFileList(SubDirectory,FileMask,AddSubDir,IncludeDirs,NumberOfFiles)