diff options
author | Caolán McNamara <caolanm@redhat.com> | 2017-01-19 13:34:31 +0000 |
---|---|---|
committer | Michael Stahl <mstahl@redhat.com> | 2017-01-19 16:33:24 +0000 |
commit | ad00157b7b60fa1feb35d1e5a4f7a6d418d10f19 (patch) | |
tree | c3daaee0cfb9a18855cf384b203e9d67f609c57a | |
parent | 1cba69762fc0a2d586bcfdf0893a6177aa63dfc4 (diff) |
Related: tdf#80731 bug in our own wizards revealed by new bracket test
Change-Id: Iec49bf80794a4ba61a70b22d0fc1769349ca4508
(cherry picked from commit ecd82b5121899fe23f0ccbdd8a89c8b18436f027)
Reviewed-on: https://gerrit.libreoffice.org/33313
Tested-by: Jenkins <ci@libreoffice.org>
Reviewed-by: Michael Stahl <mstahl@redhat.com>
-rw-r--r-- | wizards/source/importwizard/DialogModul.xba | 2 | ||||
-rw-r--r-- | wizards/source/importwizard/FilesModul.xba | 2 | ||||
-rw-r--r-- | wizards/source/tools/ModuleControls.xba | 2 |
3 files changed, 3 insertions, 3 deletions
diff --git a/wizards/source/importwizard/DialogModul.xba b/wizards/source/importwizard/DialogModul.xba index 65fb1f2aec84..e55266985414 100644 --- a/wizards/source/importwizard/DialogModul.xba +++ b/wizards/source/importwizard/DialogModul.xba @@ -375,7 +375,7 @@ Dim sPath as String ElseIf oCheckbox.State = 0 Then CheckControlPath = True Else - sPath = ConvertToUrl(Trim(oTextBox.Text) + sPath = ConvertToUrl(Trim(oTextBox.Text)) CheckControlPath = oUcb.Exists(sPath) End If End Function diff --git a/wizards/source/importwizard/FilesModul.xba b/wizards/source/importwizard/FilesModul.xba index c796cad5ea2e..1e6363f43099 100644 --- a/wizards/source/importwizard/FilesModul.xba +++ b/wizards/source/importwizard/FilesModul.xba @@ -327,7 +327,7 @@ Dim sPrevMimeTypeorExtension as String CurFiltername = GetFilterName(sMimeTypeorExtension, sFilterName(), sExtension, FilterIndex) ApplIndex = FilesList(i,2) If sMimeTypeorExtension <> sPrevMimeTypeorExtension Then - CreateLogTable(ApplIndex, sMimeTypeOrExtension, sFiltername() + CreateLogTable(ApplIndex, sMimeTypeOrExtension, sFiltername()) End If If ApplIndex > Ubound(Applications) or (ApplIndex < 0) Then Msgbox "Applicationindex out of bounds:" & sSourcUrl diff --git a/wizards/source/tools/ModuleControls.xba b/wizards/source/tools/ModuleControls.xba index 96f23ad866d4..300b6eea6da6 100644 --- a/wizards/source/tools/ModuleControls.xba +++ b/wizards/source/tools/ModuleControls.xba @@ -311,7 +311,7 @@ Dim sProdName as String Filternames(i,0) = ReplaceString(Filternames(i,0), sProdName,"%productname%") oDialog.AppendFilter(FilterNames(i,0), FilterNames(i,1)) Next i - oDialog.SetCurrentFilter(FilterNames(0,0) + oDialog.SetCurrentFilter(FilterNames(0,0)) End Sub |