[Libreoffice-commits] core.git: Branch 'distro/collabora/cp-6.2' - oovbaapi/ooo sw/source

Tor Lillqvist (via logerrit) logerrit at kemper.freedesktop.org
Fri Sep 20 09:02:47 UTC 2019


 oovbaapi/ooo/vba/word/XWordBasic.idl |    1 +
 sw/source/ui/vba/vbaapplication.cxx  |    9 +++++++++
 2 files changed, 10 insertions(+)

New commits:
commit 619b10bd3c39eb1c3ad1a6037dde8436e7d47053
Author:     Tor Lillqvist <tml at collabora.com>
AuthorDate: Wed Feb 6 12:20:45 2019 +0200
Commit:     Tor Lillqvist <tml at collabora.com>
CommitDate: Fri Sep 20 11:01:39 2019 +0200

    Add a dummy implementation of WordBasic.AppShow()
    
    Change-Id: I14379c5732c1921b8f52293045d01acf99e0b840
    (cherry picked from commit ad19df8696346e608b530a7e84b8da4fad6d8c80)
    Reviewed-on: https://gerrit.libreoffice.org/79159
    Reviewed-by: Tor Lillqvist <tml at collabora.com>
    Tested-by: Tor Lillqvist <tml at collabora.com>

diff --git a/oovbaapi/ooo/vba/word/XWordBasic.idl b/oovbaapi/ooo/vba/word/XWordBasic.idl
index bbebd72ebd89..4a91a7f7af11 100644
--- a/oovbaapi/ooo/vba/word/XWordBasic.idl
+++ b/oovbaapi/ooo/vba/word/XWordBasic.idl
@@ -41,6 +41,7 @@ interface XWordBasic
 
     long AppMaximize( [in] string WindowName, [in] any State );
     long DocMaximize( [in] any State );
+    void AppShow( [in] string WindowName );
 };
 
 }; }; };
diff --git a/sw/source/ui/vba/vbaapplication.cxx b/sw/source/ui/vba/vbaapplication.cxx
index dd5b0aa9a0bf..76c5f80229d5 100644
--- a/sw/source/ui/vba/vbaapplication.cxx
+++ b/sw/source/ui/vba/vbaapplication.cxx
@@ -111,6 +111,7 @@ public:
                                                   const css::uno::Any& OpenExclusive, const css::uno::Any& SubType) override;
     virtual sal_Int32 SAL_CALL AppMaximize( const OUString& WindowName, const css::uno::Any& State ) override;
     virtual sal_Int32 SAL_CALL DocMaximize( const css::uno::Any& State ) override;
+    virtual void SAL_CALL AppShow(  const OUString& WindowName ) override;
 };
 
 SwVbaApplication::SwVbaApplication( uno::Reference<uno::XComponentContext >& xContext ):
@@ -661,4 +662,12 @@ SwWordBasic::DocMaximize( const css::uno::Any& State )
     return 0;
 }
 
+void SAL_CALL
+SwWordBasic::AppShow( const OUString& WindowName )
+{
+    SAL_INFO("sw.vba", "WordBasic.AppShow(WindowName:=" << WindowName << ")");
+
+    // FIXME: Implement if necessary
+}
+
 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */


More information about the Libreoffice-commits mailing list