diff options
| author | Julien Nabet <serval2412@yahoo.fr> | 2013-05-01 23:28:37 +0200 |
|---|---|---|
| committer | Caolán McNamara <caolanm@redhat.com> | 2013-05-03 12:37:14 +0000 |
| commit | b10e69287c42db61679d70146ed5e7c54ee1863e (patch) | |
| tree | ef8f56c05ee619ee078a4eba6fa30bdbdd9dbfb7 | |
| parent | 9a7641451dad5c73a936de5361aa3c3f148132d0 (diff) | |
fdo#60265 Really fixes Basic problem
GetFilterName function in FilesModul.xba needs the extension be repeated too
sLocExtensionList() = ArrayoutofString(sFilterName(i,2), "|", MaxIndex)
Change-Id: I2fecd5352345e6b7541d0a961012c7e91046fb0d
Reviewed-on: https://gerrit.libreoffice.org/3729
Reviewed-by: Caolán McNamara <caolanm@redhat.com>
Tested-by: Caolán McNamara <caolanm@redhat.com>
| -rw-r--r-- | wizards/source/importwizard/DialogModul.xba | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/wizards/source/importwizard/DialogModul.xba b/wizards/source/importwizard/DialogModul.xba index 92ca87712dc9..c5210ce88595 100644 --- a/wizards/source/importwizard/DialogModul.xba +++ b/wizards/source/importwizard/DialogModul.xba @@ -333,38 +333,38 @@ Sub SetupMSConfiguration() ' See definition of Filtername-Array about meaning of fields MSFilterName(0,0) = "doc|docx|docm" MSFilterName(0,1) = "writer8|writer8|writer8" - MSFilterName(0,2) = "odt" + MSFilterName(0,2) = "odt|odt|odt" MSFilterName(0,3) = sMSDocumentCheckBox(0) MSFilterName(0,4) = "Word" MSFilterName(1,0) = "xls|xlsx|xlsm" MSFilterName(1,1) = "calc8|calc8|calc8" - MSFilterName(1,2) = "ods" + MSFilterName(1,2) = "ods|ods|ods" MSFilterName(1,3) = sMSDocumentCheckBox(1) MSFilterName(1,4) = "Excel" - MSFilterName(2,0) = "ppt|pptm|pptx" - MSFilterName(2,1) = "impress8|impress8|impress8" - MSFilterName(2,2) = "odp" + MSFilterName(2,0) = "ppt|pps|pptx|pptm|ppsx|ppsm" + MSFilterName(2,1) = "impress8|impress8|impress8|impress8|impress8|impress8" + MSFilterName(2,2) = "odp|odp|odp|odp|odp|odp" MSFilterName(2,3) = sMSDocumentCheckBox(2) MSFilterName(2,4) = "PowerPoint" MSFilterName(3,0) = "dot|dotx|dotm" MSFilterName(3,1) = "writer8_template|writer8_template|writer8_template" - MSFilterName(3,2) = "ott" + MSFilterName(3,2) = "ott|ott|ott" MSFilterName(3,3) = sMSTemplateCheckBox(0) MSFilterName(3,4) = "Word" MSFilterName(4,0) = "xlt|xltx|xltm" MSFilterName(4,1) = "calc8_template|calc8_template|calc8_template" - MSFilterName(4,2) = "ots" + MSFilterName(4,2) = "ots|ots|ots" MSFilterName(4,3) = sMSTemplateCheckBox(1) MSFilterName(4,4) = "Excel" MSFilterName(5,0) = "pot|potx|potm" MSFilterName(5,1) = "impress8_template|impress8_template|impress8_template" - MSFilterName(5,2) = "otp" + MSFilterName(5,2) = "otp|otp|otp" MSFilterName(5,3) = sMSTemplateCheckBox(2) MSFilterName(5,4) = "PowerPoint" End Sub |