diff options
author | Andreas Heinisch <andreas.heinisch@yahoo.de> | 2022-09-18 21:57:21 +0200 |
---|---|---|
committer | Andreas Heinisch <andreas.heinisch@yahoo.de> | 2022-09-25 11:39:33 +0200 |
commit | 6f3532f6aaafb6ad58a9e32dc0eff43a0d54862b (patch) | |
tree | 6fa3187cc97d7d2a125794d6830a9a439856b18d /basic/qa | |
parent | 2aed71fa9e8a36ff2dc9f48897092c26ab89ea9e (diff) |
tdf#151012 - Initialize optional parameters with their default values
Change-Id: I3ed3eb904b50892e5946abe684e801819ba296e6
Reviewed-on: https://gerrit.libreoffice.org/c/core/+/140128
Tested-by: Jenkins
Reviewed-by: Andreas Heinisch <andreas.heinisch@yahoo.de>
Diffstat (limited to 'basic/qa')
-rw-r--r-- | basic/qa/basic_coverage/test_tdf147529_optional_parameters_msgbox.bas | 4 | ||||
-rw-r--r-- | basic/qa/vba_tests/tdf147529_optional_parameters_msgbox.vb | 4 |
2 files changed, 2 insertions, 6 deletions
diff --git a/basic/qa/basic_coverage/test_tdf147529_optional_parameters_msgbox.bas b/basic/qa/basic_coverage/test_tdf147529_optional_parameters_msgbox.bas index dabb23c0faf1..67378213e287 100644 --- a/basic/qa/basic_coverage/test_tdf147529_optional_parameters_msgbox.bas +++ b/basic/qa/basic_coverage/test_tdf147529_optional_parameters_msgbox.bas @@ -18,9 +18,7 @@ Sub verify_testOptionalParametersMsgBox On Error GoTo errorHandler
' tdf#147529 - check for missing optional parameters
- TestUtil.AssertEqual(TestOptionalParametersMsgBox(), True, "TestOptionalParametersMsgBox()")
- TestUtil.AssertEqual(TestOptionalParametersMsgBox("test"), True, "TestOptionalParametersMsgBox(""test"")")
- TestUtil.AssertEqual(TestOptionalParametersMsgBox("test", 1), True, "TestOptionalParametersMsgBox(""test"", 1)")
+ TestUtil.AssertEqual(TestOptionalParametersMsgBox(), True, "TestOptionalParametersMsgBox()")
Exit Sub errorHandler: diff --git a/basic/qa/vba_tests/tdf147529_optional_parameters_msgbox.vb b/basic/qa/vba_tests/tdf147529_optional_parameters_msgbox.vb index dabe552a821b..e599f46eedf1 100644 --- a/basic/qa/vba_tests/tdf147529_optional_parameters_msgbox.vb +++ b/basic/qa/vba_tests/tdf147529_optional_parameters_msgbox.vb @@ -19,9 +19,7 @@ Sub verify_testOptionalParametersMsgBox On Error GoTo errorHandler
' tdf#147529 - check for missing optional parameters
- TestUtil.AssertEqual(TestOptionalParametersMsgBox(), True, "TestOptionalParametersMsgBox()")
- TestUtil.AssertEqual(TestOptionalParametersMsgBox("test"), True, "TestOptionalParametersMsgBox(""test"")")
- TestUtil.AssertEqual(TestOptionalParametersMsgBox("test", 1), True, "TestOptionalParametersMsgBox(""test"", 1)")
+ TestUtil.AssertEqual(TestOptionalParametersMsgBox(), True, "TestOptionalParametersMsgBox()")
Exit Sub errorHandler: |