[Libreoffice-commits] core.git: wizards/source

[Jean-Pierre Ledure (via logerrit)]

 wizards/source/sfdialogs/SF_Register.xba |    3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

New commits:
commit 5109a3ed77c00708d1981b60120698f0e1833313
Author:     Jean-Pierre Ledure <j...@ledure.be>
AuthorDate: Mon Nov 16 12:09:42 2020 +0100
Commit:     Jean-Pierre Ledure <j...@ledure.be>
CommitDate: Mon Nov 16 12:19:54 2020 +0100

    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 <j...@ledure.be>
    Reviewed-by: Jean-Pierre Ledure <j...@ledure.be>

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   &apos;  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   &apos;  SFDialogs.SF_Register._NewDialog
 
 REM ============================================== END OF SFDIALOGS.SF_REGISTER
-</script:module>
+</script:module>
\ No newline at end of file
_______________________________________________
Libreoffice-commits mailing list
libreoffice-comm...@lists.freedesktop.org
https://lists.freedesktop.org/mailman/listinfo/libreoffice-commits