Update ooo320-m1
[ooovba.git] / applied_patches / 0081-wizards-source-importwizard-filesmodul-xba.diff
blobe75855fb8f6b29f5c1d5b7f03ac59734e85b4817
1 --- wizards.orig/source/importwizard/FilesModul.xba 2005-05-13 10:43:43.000000000 +0100
2 +++ wizards/source/importwizard/FilesModul.xba 2005-10-24 15:49:21.000000000 +0100
3 @@ -41,6 +41,7 @@ Dim NewContentList() as String
4 Dim XMLTemplateContentString as String
5 Dim ApplIndex as Integer
6 Dim bAssignFileName as Boolean
7 +Dim bInterruptSearch as Boolean
8 bInterruptSearch = False
9 For i = 0 To MaxCollectIndex
10 SearchDir = PathCollection(i,0)