Kaydet (Commit) 25547fbd authored tarafından Caolán McNamara's avatar Caolán McNamara

Related: fdo#60265 fix lunatic way to detect special filter name

The use of SBMAXEXTENSIONLENGTH appears to be an insane way
to detect full filter names and map them back to short suffixes
but we are passing suffixes separated by | and if that string
hits the SBMAXEXTENSIONLENGTH it gets blanked.

So, lets try only doing the conversion to suffix if the filter
name starts with a common substr handled by SetExtension

Change-Id: I42914d3e042133a2c5e28c9704b5fded7ca938dc
üst b10e6928
......@@ -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
......
......@@ -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, "|", ";")
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment