[Libreoffice-commits] core.git: wizards/source

[Katarina Behrens]

 wizards/source/gimmicks/ReadDir.xba |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

New commits:
commit 6bb6ca1fb30f786385c2357e5435077066a49f82
Author: Katarina Behrens <katarina.behr...@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 <c...@libreoffice.org>
    Reviewed-by: Katarina Behrens <katarina.behr...@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 &gt; Ubound(DirList()
+       Loop Until m &gt; 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>
_______________________________________________
Libreoffice-commits mailing list
libreoffice-comm...@lists.freedesktop.org
https://lists.freedesktop.org/mailman/listinfo/libreoffice-commits