[Libreoffice-commits] core.git: basic/qa

Andreas Heinisch (via logerrit) logerrit at kemper.freedesktop.org
Tue Sep 7 18:52:34 UTC 2021


 basic/qa/cppunit/test_vba.cxx    |    1 +
 basic/qa/vba_tests/collection.vb |    8 ++++----
 2 files changed, 5 insertions(+), 4 deletions(-)

New commits:
commit 092740eddd9d2e9b19e4c08f4980a59402e676e1
Author:     Andreas Heinisch <andreas.heinisch at yahoo.de>
AuthorDate: Tue Sep 7 19:49:41 2021 +0200
Commit:     Andreas Heinisch <andreas.heinisch at yahoo.de>
CommitDate: Tue Sep 7 20:52:00 2021 +0200

    tdf#144245 - Added test file to automatic test
    
    Change-Id: I92b71b7e7ac8c2262d36875e4b04ed91e17bc495
    Reviewed-on: https://gerrit.libreoffice.org/c/core/+/121791
    Tested-by: Jenkins
    Reviewed-by: Andreas Heinisch <andreas.heinisch at yahoo.de>

diff --git a/basic/qa/cppunit/test_vba.cxx b/basic/qa/cppunit/test_vba.cxx
index 8c43575f8f51..64875b9e1c46 100644
--- a/basic/qa/cppunit/test_vba.cxx
+++ b/basic/qa/cppunit/test_vba.cxx
@@ -74,6 +74,7 @@ void VBATest::testMiscVBAFunctions()
         "cos.vb",
         "cint.vb",
         "clng.vb",
+        "collection.vb",
         "csng.vb",
         "cstr.vb",
         "cvdate.vb",
diff --git a/basic/qa/vba_tests/collection.vb b/basic/qa/vba_tests/collection.vb
index 0b765905290a..d98ad9d1d237 100644
--- a/basic/qa/vba_tests/collection.vb
+++ b/basic/qa/vba_tests/collection.vb
@@ -60,10 +60,10 @@ Sub verify_testCollection()
     ' After the fix of tdf#110003
     ' TestUtil.AssertEqual(b.Count, 2, "b.Count")
 
-    TestUtil.AssertEqual(a.Item("SS"), 1, "a.Item(""SS"")")
-    TestUtil.AssertEqual(a.Item("ss"), 1, "a.Item(""ss"")")
-    TestUtil.AssertEqual(a.Item("ẞ"), 3, "a.Item(""ẞ"")")
-    TestUtil.AssertEqual(a.Item("ß"), 4, "a.Item(""ß"")")
+    TestUtil.AssertEqual(b.Item("SS"), 1, "a.Item(""SS"")")
+    TestUtil.AssertEqual(b.Item("ss"), 1, "a.Item(""ss"")")
+    TestUtil.AssertEqual(b.Item("ẞ"), 3, "a.Item(""ẞ"")")
+    TestUtil.AssertEqual(b.Item("ß"), 4, "a.Item(""ß"")")
     ' After the fix of tdf#110003
     ' TestUtil.AssertEqual(a.Item("ß"), 3, "a.Item(""ß"")")
 


More information about the Libreoffice-commits mailing list