diff options
| -rw-r--r-- | wizards/source/importwizard/DialogModul.xba | 2 | ||||
| -rw-r--r-- | wizards/source/importwizard/FilesModul.xba | 2 |
2 files changed, 1 insertions, 3 deletions
diff --git a/wizards/source/importwizard/DialogModul.xba b/wizards/source/importwizard/DialogModul.xba index c5210ce88595..673113fc59ce 100644 --- a/wizards/source/importwizard/DialogModul.xba +++ b/wizards/source/importwizard/DialogModul.xba @@ -74,8 +74,6 @@ Public XMLTemplateList() ' Applications(X,8) = "File:///..." (TargetUrl of the templates) ' Applications(X,9) = 0 (Key to the original Index of the Applications) -Public Const SBMAXEXTENSIONLENGTH = 15 - Sub FillStep_Welcome() Dim i as Integer diff --git a/wizards/source/importwizard/FilesModul.xba b/wizards/source/importwizard/FilesModul.xba index b33404b1d537..4e2bd4c156b7 100644 --- a/wizards/source/importwizard/FilesModul.xba +++ b/wizards/source/importwizard/FilesModul.xba @@ -187,7 +187,7 @@ Dim LocXMLTemplateContent as String iKey = Applications(ApplIndex, SBAPPLKEY) CurListString = PathCollection(CollectIndex, 2) LocExtension = sFilterName(iKey +DistIndex, 0) - If Len(LocExtension) > SBMAXEXTENSIONLENGTH Then ' 7 == Length of two extensions like 'sda|sdd + If Instr(LocExtension, "vnd.sun.xml.") = 1 Then LocExtension = SetExtension(LocExtension) LocContentString = sFilterName(iKey +DistIndex, 0) LocContentString = ReplaceString(LocContentString, "|", ";") |