TDF Git
Code Review
gerrit.libreoffice.org / core / acfd369ebbd59d64290a846f49815592b6b95b30^! / .
commitacfd369ebbd59d64290a846f49815592b6b95b30[log]
authorJean-Pierre Ledure <jp@ledure.be>Tue Feb 02 17:04:00 2021 +0100
committerJean-Pierre Ledure <jp@ledure.be>Wed Feb 03 16:37:51 2021 +0100
tree83f328fb9f41df85034ff247e1fafedbbf746af2
parent98fb5aaa244cd8dc0c87047f951a061fcd302540 [diff]
ScriptForge - (SF_Exception) fix DebugPrint accepts missing arguments

In statements like:
   DebugPrint(,a)
the first missing argument gives an error 448

The error is now intercepted and replaced by a zero-length string
in the console display

Change-Id: Id41f2c786ef935e062815f8cf1e80b0a1fec5857
Reviewed-on: https://gerrit.libreoffice.org/c/core/+/110327
Tested-by: Jean-Pierre Ledure <jp@ledure.be>
Tested-by: Jenkins
Reviewed-by: Jean-Pierre Ledure <jp@ledure.be>

diff --git a/wizards/source/scriptforge/SF_Exception.xba b/wizards/source/scriptforge/SF_Exception.xba
index fa0db91..8739e0e 100644
--- a/wizards/source/scriptforge/SF_Exception.xba
+++ b/wizards/source/scriptforge/SF_Exception.xba

@@ -415,6 +415,7 @@ Try:
	&apos;	Build new console line
	sOutput = &quot;&quot;
	For i = 0 To UBound(pvArgs)
		If IsError(pvArgs(i)) Then pvArgs(i) = &quot;&quot;
		sArg = Iif(i = 0, &quot;&quot;, SF_String.sfTAB) &amp; SF_Utils._Repr(pvArgs(i), cstMaxLength)	&apos;Do not use SF_String.Represent()
		sOutput = sOutput &amp; sArg
	Next i