diff options
author | Jean-Pierre Ledure <jp@ledure.be> | 2017-03-26 12:34:21 +0200 |
---|---|---|
committer | Mike Kaganski <mike.kaganski@collabora.com> | 2017-03-27 21:13:00 +0000 |
commit | 648ab6fcab8b9e8642c6f5cbac9c9e44579de746 (patch) | |
tree | 8cc3b33ee759b77fd3e7cc179d153607699e0bf4 /wizards | |
parent | c0b5e7ec7112f228b31389a4a3cc9b40d7c181cb (diff) |
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@libreoffice.org>
Reviewed-by: Mike Kaganski <mike.kaganski@collabora.com>
Diffstat (limited to 'wizards')
-rw-r--r-- | wizards/source/access2base/Application.xba | 2 |
1 files changed, 1 insertions, 1 deletions
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) |