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

[Tor Lillqvist (via logerrit)]

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

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

    Add a dummy implementation of WordBasic.AppCount()
    
    Change-Id: Ia9e78c331d2cb711653ee3e64597ebf2824e0eeb
    (cherry picked from commit c06a3f33d0de59f9cbfddef353f9018a6583df4a)
    Reviewed-on: https://gerrit.libreoffice.org/79160
    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 4a91a7f7af11..d9e2a239668e 100644
--- a/oovbaapi/ooo/vba/word/XWordBasic.idl
+++ b/oovbaapi/ooo/vba/word/XWordBasic.idl
@@ -42,6 +42,7 @@ interface XWordBasic
     long AppMaximize( [in] string WindowName, [in] any State );
     long DocMaximize( [in] any State );
     void AppShow( [in] string WindowName );
+    long AppCount();
 };
 
 }; }; };
diff --git a/sw/source/ui/vba/vbaapplication.cxx b/sw/source/ui/vba/vbaapplication.cxx
index 76c5f80229d5..73a0c5394ff8 100644
--- a/sw/source/ui/vba/vbaapplication.cxx
+++ b/sw/source/ui/vba/vbaapplication.cxx
@@ -112,6 +112,7 @@ public:
     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;
+    virtual sal_Int32 SAL_CALL AppCount() override;
 };
 
 SwVbaApplication::SwVbaApplication( uno::Reference<uno::XComponentContext >& xContext ):
@@ -670,4 +671,13 @@ SwWordBasic::AppShow( const OUString& WindowName )
     // FIXME: Implement if necessary
 }
 
+sal_Int32 SAL_CALL
+SwWordBasic::AppCount()
+{
+    SAL_INFO("sw.vba", "WordBasic.AppCount()");
+
+    // FIXME: Implement if necessary. Return a random number for now.
+    return 2;
+}
+
 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */