summaryrefslogtreecommitdiff
path: root/basic/qa
diff options
context:
space:
mode:
authorEike Rathke <erack@redhat.com>2017-04-28 15:45:54 +0200
committerEike Rathke <erack@redhat.com>2017-04-28 15:46:33 +0200
commitaf754ef9d6655a7b76a39f5a2c5bef8290fc3163 (patch)
tree4dc1902a051e2cb3e96ff5f0a2f09d4d1e9dc870 /basic/qa
parentcdcbdf88b7f74184b532925eaf140dbf65a2cd21 (diff)
Add unit test for CDateFromIso with YYYY-MM-DD, tdf#106956
Change-Id: Id7867228c091bb60764225a6436087dd390f13de
Diffstat (limited to 'basic/qa')
-rw-r--r--basic/qa/basic_coverage/test_cdatetofromiso_methods.vb3
1 files changed, 3 insertions, 0 deletions
diff --git a/basic/qa/basic_coverage/test_cdatetofromiso_methods.vb b/basic/qa/basic_coverage/test_cdatetofromiso_methods.vb
index 02ec5853ccb4..3eb5e63e83ff 100644
--- a/basic/qa/basic_coverage/test_cdatetofromiso_methods.vb
+++ b/basic/qa/basic_coverage/test_cdatetofromiso_methods.vb
@@ -10,7 +10,10 @@ Function doUnitTest as Integer
' CDateFromIso CDateToIso
If ( CDateToIso( CDateFromIso("20161016") ) <> "20161016" ) Then
doUnitTest = 0
+ ElseIf ( CDateToIso( CDateFromIso("2016-10-16") ) <> "20161016" ) Then
+ doUnitTest = 0
Else
doUnitTest = 1
End If
+ ' TODO: add some failure tests for misformed input, On Error whatever?
End Function