diff options
| author | Kohei Yoshida <kohei.yoshida@suse.com> | 2011-08-13 01:04:26 -0400 |
|---|---|---|
| committer | Kohei Yoshida <kohei.yoshida@suse.com> | 2011-08-16 21:22:43 -0400 |
| commit | 80b1e662777100a7dfd80176a2b528880a838167 (patch) | |
| tree | fe39ee8773de6282e6e2b468b815eadf4fc7ddca /vbahelper | |
| parent | d2e538a63507aa3310a854d5c1414565efa3a361 (diff) | |
Added XPropertySet2 to allow disabling of change event notifications.
Sometimes broadcasting changes to the property set on every new
value insertion makes no sense especially during import. Turning
that off also improves performance especially when inserting millions
of property values.
Diffstat (limited to 'vbahelper')
| -rw-r--r-- | vbahelper/source/msforms/vbacontrol.cxx | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/vbahelper/source/msforms/vbacontrol.cxx b/vbahelper/source/msforms/vbacontrol.cxx index 8bebe6050d44..c7e2c6ed3641 100644 --- a/vbahelper/source/msforms/vbacontrol.cxx +++ b/vbahelper/source/msforms/vbacontrol.cxx @@ -449,7 +449,7 @@ void ScVbaControl::fireEvent( script::ScriptEvent& evt ) uno::Reference< lang::XMultiServiceFactory > xDocFac( m_xModel, uno::UNO_QUERY_THROW ); uno::Reference< document::XCodeNameQuery > xNameQuery( xDocFac->createInstance( rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("ooo.vba.VBACodeNameProvider")) ), uno::UNO_QUERY_THROW ); uno::Reference< uno::XInterface > xIf( xControlShape->getControl(), uno::UNO_QUERY_THROW ); - evt.ScriptCode = xNameQuery->getCodeNameForObject( xIf ); + evt.ScriptCode = xNameQuery->getCodeNameForObject( xIf, xIf ); // TODO : FIX THIS!!! evt.Arguments[ 0 ] = uno::makeAny( aEvt ); xScriptListener->firing( evt ); } |