diff options
Diffstat (limited to 'wizards/source/euro/AutoPilotRun.xba')
| -rw-r--r-- | wizards/source/euro/AutoPilotRun.xba | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/wizards/source/euro/AutoPilotRun.xba b/wizards/source/euro/AutoPilotRun.xba index 2ca883eb5fa6..1c6d04e6e177 100644 --- a/wizards/source/euro/AutoPilotRun.xba +++ b/wizards/source/euro/AutoPilotRun.xba @@ -60,7 +60,7 @@ Dim bDisposable as Boolean FilterList(0) = "application/x-starcalc" FilterList(1) = "application/vnd.stardivision.calc" FilterList(2) = "application/vnd.sun.xml.calc" - FilterList(3) = "application/x-vnd.oasis.openoffice.spreadsheet" + FilterList(3) = "application/vnd.oasis.opendocument.spreadsheet" If DialogModel.chkTextDocuments.State = 1 Then ReDim Preserve FilterList(8) as String @@ -68,7 +68,7 @@ Dim bDisposable as Boolean FilterList(5) = "application/vnd.stardivision.writer" FilterList(6) = "application/vnd.stardivision.writer/web" FilterList(7) = "application/vnd.sun.xml.writer" - FilterList(8) = "application/x-vnd.oasis.openoffice.text" + FilterList(8) = "application/vnd.oasis.opendocument.text" End If FilesList() = ReadDirectories(SourceDir, bRecursive, True, False, FilterList()) TotDocCount = Ubound(FilesList(),1) + 1 |