Try ignoring RuntimeException in ComḿandBars(), VB6 clients don't like them?

Change-Id: Ia577174fac926295db439349f6caca178b363ba0

Try ignoring RuntimeException in ComḿandBars(), VB6 clients don't like them?
Change-Id: Ia577174fac926295db439349f6caca178b363ba0
87b6dac1 · Tor Lillqvist · a3b14307 · 87b6dac1
Kaydet (Commit) 87b6dac1 authored Ock 18, 2019 tarafından Tor Lillqvist
Hide whitespace changes
Inline Side-by-side

Showing with 8 additions and 1 deletion

vbaapplication.cxx sw/source/ui/vba/vbaapplication.cxx +8 -1

No files found.
--- a/sw/source/ui/vba/vbaapplication.cxx
+++ b/sw/source/ui/vba/vbaapplication.cxx
@@ -167,7 +167,14 @@ SwVbaApplication::getOptions()
 uno::Any SAL_CALL
 SwVbaApplication::CommandBars( const uno::Any& aIndex )
 {
-    return VbaApplicationBase::CommandBars( aIndex );
+    try
+    {
+        return VbaApplicationBase::CommandBars( aIndex );
+    }
+    catch (const uno::RuntimeException&)
+    {
+        return uno::Any();
+    }
 }

 uno::Reference< word::XSelection > SAL_CALL