strepsirrhini/office-gobmx
9
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

INTEGRATION: CWS c05v001 (1.38.68); FILE MERGED

Browse source 
2005/10/10 12:23:36 ih 1.38.68.2: #125491# global doc filter disabled if no global doc module is installed
2005/10/06 15:45:35 kz 1.38.68.1: #125491# Standalone impress: Wizards - Document converter doesn't check installed modules (BC)
This commit is contained in:
Kurt Zenker 2005-11-11 13:20:25 +00:00
parent e6a4f5ab51
commit 823e2421e5
1 changed files with 33 additions and 10 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

43
wizards/source/importwizard/DialogModul.xba
View file

@ -485,10 +485,21 @@ Sub SetupXMLConfiguration()
XMLFilterName(1,2) = "ods|ods"
XMLFilterName(1,3) = sDocumentCheckBox(1)
XMLFilterName(2,0) = "sdd|sda|sxi|sxd"
XMLFilterName(2,1) = "impress8|draw8|impress8|draw8"
XMLFilterName(2,2) = "odp|odg|odp|odg"
If oFactoryKey.HasByName("com.sun.star.drawing.DrawingDocument") and oFactoryKey.HasByName("com.sun.star.presentation.PresentationDocument") Then
XMLFilterName(2,0) = "sdd|sda|sxi|sxd"
XMLFilterName(2,1) = "impress8|draw8|impress8|draw8"
XMLFilterName(2,2) = "odp|odg|odp|odg"
Elseif oFactoryKey.HasByName("com.sun.star.drawing.DrawingDocument") Then
XMLFilterName(2,0) = "sda|sxd"
XMLFilterName(2,1) = "draw8|draw8"
XMLFilterName(2,2) = "odg|odg"
Elseif oFactoryKey.HasByName("com.sun.star.presentation.PresentationDocument") Then
XMLFilterName(2,0) = "sdd|sxi"
XMLFilterName(2,1) = "impress8|impress8"
XMLFilterName(2,2) = "odp|odp"
End If
XMLFilterName(2,3) = sDocumentCheckBox(2)
XMLFilterName(3,0) = "smf|sxm"
XMLFilterName(3,1) = "math8|math8"
@ -508,15 +519,27 @@ Sub SetupXMLConfiguration()
' due to bug #108942# impress templates of the version 4.0 have to be handled in a special way because their mimetype
' falsely points to the draw application.
XMLFilterName(6,0) = "application/x-openoffice-starimpress|application/x-openoffice-stardraw-40|application/x-openoffice-stardraw|application/vnd.sun.xml.impress|application/vnd.sun.xml.draw"
XMLFilterName(6,1) = "impress8_template|impress8_template|draw8_template|impress8_template|draw8_template"
XMLFilterName(6,2) = "otp|otp|otg|otp|otg"
If oFactoryKey.HasByName("com.sun.star.drawing.DrawingDocument") and oFactoryKey.HasByName("com.sun.star.presentation.PresentationDocument") Then
XMLFilterName(6,0) = "application/x-openoffice-starimpress|application/x-openoffice-stardraw-40|application/x-openoffice-stardraw|application/vnd.sun.xml.impress|application/vnd.sun.xml.draw"
XMLFilterName(6,1) = "impress8_template|impress8_template|draw8_template|impress8_template|draw8_template"
XMLFilterName(6,2) = "otp|otp|otg|otp|otg"
Elseif oFactoryKey.HasByName("com.sun.star.drawing.DrawingDocument") Then
XMLFilterName(6,0) = "application/x-openoffice-stardraw|application/vnd.sun.xml.draw"
XMLFilterName(6,1) = "draw8_template|draw8_template"
XMLFilterName(6,2) = "otg|otg"
Elseif oFactoryKey.HasByName("com.sun.star.presentation.PresentationDocument") Then
XMLFilterName(6,0) = "application/x-openoffice-starimpress|application/x-openoffice-stardraw-40|application/vnd.sun.xml.impress"
XMLFilterName(6,1) = "impress8_template|impress8_template|impress8_template"
XMLFilterName(6,2) = "otp|otp|otp"
End If
XMLFilterName(6,3) = sTemplateCheckBox(2)
XMLFilterName(7,0) = "sgl|sxg"
XMLFilterName(7,1) = "writerglobal8|writerglobal8"
XMLFilterName(7,2) = "odm|odm"
XMLFilterName(7,3) = sTemplateCheckBox(3)
If oFactoryKey.HasByName("com.sun.star.text.GlobalDocument") Then
XMLFilterName(7,0) = "sgl|sxg"
XMLFilterName(7,1) = "writerglobal8|writerglobal8"
XMLFilterName(7,2) = "odm|odm"
XMLFilterName(7,3) = sTemplateCheckBox(3)
End If
End Sub