[Libreoffice-commits] core.git: wizards/source
Katarina Behrens
Katarina.Behrens at cib.de
Tue Feb 28 21:29:03 UTC 2017
wizards/source/gimmicks/ReadDir.xba | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
New commits:
commit 6bb6ca1fb30f786385c2357e5435077066a49f82
Author: Katarina Behrens <Katarina.Behrens at cib.de>
Date: Tue Feb 28 16:31:49 2017 +0100
Related: tdf#80731 missing ')' breaks Gimmicks.Autotext macro
Change-Id: Idbfcab663b5f4dbd97b49f2771c62564ca7d7972
Reviewed-on: https://gerrit.libreoffice.org/34725
Tested-by: Jenkins <ci at libreoffice.org>
Reviewed-by: Katarina Behrens <Katarina.Behrens at cib.de>
diff --git a/wizards/source/gimmicks/ReadDir.xba b/wizards/source/gimmicks/ReadDir.xba
index 0287f43..fdd725b 100644
--- a/wizards/source/gimmicks/ReadDir.xba
+++ b/wizards/source/gimmicks/ReadDir.xba
@@ -263,7 +263,7 @@ Dim MaxFileIndex as Integer
End If
Next i
End If
- Loop Until m > Ubound(DirList()
+ Loop Until m > Ubound(DirList())
ReDim Preserve FileNameList(n-1,1) as String
ReadSourceDirectory() = FileNameList()
End Function
@@ -319,4 +319,4 @@ Sub ToggleDialogControls(bDoEnable as Boolean)
.Label2.Enabled = bDoEnable
.TextField1.Enabled = bDoEnable
End With
-End Sub</script:module>
\ No newline at end of file
+End Sub</script:module>
More information about the Libreoffice-commits
mailing list