1 files changed, 5 insertions, 6 deletions

diff --git a/wizards/source/importwizard/DialogModul.xba b/wizards/source/importwizard/DialogModul.xba
index 429982ebff97..1edc13d39cf7 100644
--- a/wizards/source/importwizard/DialogModul.xba
+++ b/wizards/source/importwizard/DialogModul.xba
@@ -381,16 +381,16 @@ Sub SetupXMLConfiguration()
 	XMLFilterName(1,0) = "sdc"
 	XMLFilterName(1,1) = "scalc: StarOffice XML (Calc)"
 	XMLFilterName(1,2) = "sxc"
-
+' Todo: Gepacktes 'sdp' Format berücksichtigen
 	XMLFilterName(2,0) = "sdd|sda"
 	XMLFilterName(2,1) = "simpress: StarOffice XML (Impress)|sdraw: StarOffice XML (Draw)"
 	XMLFilterName(2,2) = "sxi|sxd"
 
 	XMLFilterName(3,0) = "smf"
-	XMLFilterName(3,1) = "smath: MathML XML (Math)"
-	XMLFilterName(3,2) = "mml"
+	XMLFilterName(3,1) = "smath: StarOffice XML (Math)"
+	XMLFilterName(3,2) = "sxm"
 
-	XMLFilterName(4,0) = "application/vnd.stardivision.writer;application/x-starwriter"
+	XMLFilterName(4,0) = "application/vnd.stardivision.writer;application/vnd.stardivision.writer/web;application/x-starwriter"
 	XMLFilterName(4,1) = "swriter: writer_StarOffice_XML_Writer_Template"
 	XMLFilterName(4,2) = "stw"
 
@@ -402,7 +402,6 @@ Sub SetupXMLConfiguration()
 	XMLFilterName(6,1) = "simpress: impress_StarOffice_XML_Impress_Template|draw_StarOffice_XML_Draw_Template"
 	XMLFilterName(6,2) = "sti|std"
 
-' ToDo: define Filter for Masterdocument
 	XMLFilterName(7,0) = "sgl"
 	XMLFilterName(7,1) = "swriter: writer_globaldocument_StarOffice_XML_Writer_GlobalDocument"
 	XMLFilterName(7,2) = "sxg"
@@ -508,7 +507,7 @@ Dim sPath as String
 Dim InitPath as String
 Dim RefControlName as String
 Dim oRefControl
-	oFolderDialog = CreateUnoService("com.sun.star.ui.FolderPicker")
+	oFolderDialog = CreateUnoService("com.sun.star.ui.dialogs.FolderPicker")
 	RefControlName = aEvent.Source.Model.Tag
 	oRefControl = ImportDialogArea.GetControl(RefControlName)
 	InitPath = ConvertToUrl(oRefControl.Model.Text)