[Libreoffice-commits] core.git: 2 commits - extensions/source sw/source

[Libreoffice Gerrit user]

 extensions/source/ole/unoobjw.cxx   |    4 ++++
 sw/source/ui/vba/vbaapplication.cxx |    3 ++-
 sw/source/ui/vba/vbaapplication.hxx |    1 -
 3 files changed, 6 insertions(+), 2 deletions(-)

New commits:
commit bc02c97d87ff100ad9665f32c8d6fefde5023a6c
Author:     Tor Lillqvist <tml at collabora.com>
AuthorDate: Mon Jan 21 17:33:01 2019 +0200
Commit:     Tor Lillqvist <tml at collabora.com>
CommitDate: Mon Jan 21 17:34:37 2019 +0200

    Implement WordBasic.FileSave()
    
    Change-Id: Iafb5be16ebb23aa09e0300a77c2f2dbe29b85cad

diff --git a/sw/source/ui/vba/vbaapplication.cxx b/sw/source/ui/vba/vbaapplication.cxx
index 2674a9c6efe1..90196adf5008 100644
--- a/sw/source/ui/vba/vbaapplication.cxx
+++ b/sw/source/ui/vba/vbaapplication.cxx
@@ -533,7 +533,8 @@ SwWordBasic::FileOpen( const OUString& Name, const uno::Any& ConfirmConversions,
 void SAL_CALL
 SwWordBasic::FileSave()
 {
-    // FIXME save it
+    uno::Reference< frame::XModel > xModel( mpApp->getCurrentDocument(), uno::UNO_SET_THROW );
+    dispatchRequests(xModel,".uno:Save");
 }
 
 void SAL_CALL
diff --git a/sw/source/ui/vba/vbaapplication.hxx b/sw/source/ui/vba/vbaapplication.hxx
index b32a372749cd..2b566ad94c82 100644
--- a/sw/source/ui/vba/vbaapplication.hxx
+++ b/sw/source/ui/vba/vbaapplication.hxx
@@ -111,7 +111,6 @@ public:
     // XSinkCaller
     virtual void SAL_CALL CallSinks( const OUString& Method, css::uno::Sequence< css::uno::Any >& Arguments ) override;
 
-protected:
     virtual css::uno::Reference< css::frame::XModel > getCurrentDocument() override;
 };
 #endif // INCLUDED_SW_SOURCE_UI_VBA_VBAAPPLICATION_HXX
commit 3ec34d642dd062be56346cfb39d5832d423cf38e
Author:     Tor Lillqvist <tml at collabora.com>
AuthorDate: Mon Jan 21 17:21:29 2019 +0200
Commit:     Tor Lillqvist <tml at collabora.com>
CommitDate: Mon Jan 21 17:34:31 2019 +0200

    SAL_INFO also for parameter names that are not found
    
    Change-Id: I1b3fd47a23002673cb81811ebfd0034ca546d837

diff --git a/extensions/source/ole/unoobjw.cxx b/extensions/source/ole/unoobjw.cxx
index 8897f0c5644f..03314e44f506 100644
--- a/extensions/source/ole/unoobjw.cxx
+++ b/extensions/source/ole/unoobjw.cxx
@@ -1191,15 +1191,19 @@ STDMETHODIMP InterfaceOleWrapper::GetIDsOfNames(REFIID /*riid*/,
                         auto aParamInfos = xIdlMethod->getParameterInfos();
                         for (unsigned int i = 1; i < cNames; ++i)
                         {
+                            bool bFound = false;
                             for (int j = 0; j < aParamInfos.getLength(); ++j)
                             {
                                 if (aParamInfos[j].aName.equalsIgnoreAsciiCase(OUString(o3tl::toU(rgszNames[i]))))
                                 {
                                     rgdispid[i] = j;
+                                    bFound = true;
                                     SAL_INFO("extensions.olebridge", "  " << OUString(o3tl::toU(rgszNames[i])) << ": " << rgdispid[i]);
                                     break;
                                 }
                             }
+                            if (!bFound)
+                                SAL_INFO("extensions.olebridge", "  " << OUString(o3tl::toU(rgszNames[i])) << ": NOT FOUND");
                         }
                     }
                 }