diff options
author | Jean-Pierre Ledure <jp@ledure.be> | 2020-11-16 12:09:42 +0100 |
---|---|---|
committer | Jean-Pierre Ledure <jp@ledure.be> | 2020-11-16 12:19:54 +0100 |
commit | 5109a3ed77c00708d1981b60120698f0e1833313 (patch) | |
tree | b3a4e65899c746a1e613b86d5728fe38c291f7e6 /wizards | |
parent | d828901d92c5c74627018dd84400d5de87b153af (diff) |
ScriptForge: (dialog) fix when argument is ThisComponent
Avoid "Object variable not set" Basic runtime error
on line
Set oLibraries = oComp.DialogLibraries
when pvArgs(0) is a XComponent object
Change-Id: Id35a492905c47d81ef02d433c98d83b4c81eafeb
Reviewed-on: https://gerrit.libreoffice.org/c/core/+/105921
Tested-by: Jean-Pierre Ledure <jp@ledure.be>
Reviewed-by: Jean-Pierre Ledure <jp@ledure.be>
Diffstat (limited to 'wizards')
-rw-r--r-- | wizards/source/sfdialogs/SF_Register.xba | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/wizards/source/sfdialogs/SF_Register.xba b/wizards/source/sfdialogs/SF_Register.xba index c1021fa8552d..e95966d835c6 100644 --- a/wizards/source/sfdialogs/SF_Register.xba +++ b/wizards/source/sfdialogs/SF_Register.xba @@ -286,6 +286,7 @@ Try: Case V_OBJECT ' com.sun.star.lang.XComponent bFound = True vWindow = oUi._IdentifyWindow(vContainer) + Set oComp = vContainer End Select If Not bFound Then GoTo CatchNotFound If Len(vWindow.DocumentType) = 0 Then GoTo CatchNotFound @@ -324,4 +325,4 @@ CatchNotFound: End Function ' SFDialogs.SF_Register._NewDialog REM ============================================== END OF SFDIALOGS.SF_REGISTER -</script:module> +</script:module>
\ No newline at end of file |