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

Jean-Pierre Ledure jp at ledure.be
Mon Mar 27 21:13:20 UTC 2017


 wizards/source/access2base/Application.xba |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

New commits:
commit 648ab6fcab8b9e8642c6f5cbac9c9e44579de746
Author: Jean-Pierre Ledure <jp at ledure.be>
Date:   Sun Mar 26 12:34:21 2017 +0200

    Access2Base Missing parentheses - tdf#106710
    
    Due to more severe Basic interpreter on final parentheses
    missing parentheses were revealed
    (complement to commit cc16dfb11dfc275317bb535a62b11935c562b670)
    
    Change-Id: I45b43bca4a5ee938e9c4dc0b0f8b2d5856f710da
    Reviewed-on: https://gerrit.libreoffice.org/35780
    Tested-by: Jenkins <ci at libreoffice.org>
    Reviewed-by: Mike Kaganski <mike.kaganski at collabora.com>

diff --git a/wizards/source/access2base/Application.xba b/wizards/source/access2base/Application.xba
index 9fc7308955cb..6bd29a6d86f4 100644
--- a/wizards/source/access2base/Application.xba
+++ b/wizards/source/access2base/Application.xba
@@ -1301,7 +1301,7 @@ Const cstThisSub = "OpenDatabase"
 	Set oBaseContext = CreateUnoService("com.sun.star.sdb.DatabaseContext")
 	sDbNames() = oBaseContext.getElementNames()
 	bFound = False
-	For i = 0 To UBound(sDbNames()		'	Enumerate registered databases and check non case-sensitive equality
+	For i = 0 To UBound(sDbNames())		'	Enumerate registered databases and check non case-sensitive equality
 		If UCase(sDbNames(i)) = UCase(pvDatabaseURL) Then
 			sDatabaseURL = sDbNames(i)
 			Set oBaseSource = oBaseContext.getByName(sDatabaseURL)


More information about the Libreoffice-commits mailing list