From c8f40655eac948bb8b7c9387e7333160c0088f4f Mon Sep 17 00:00:00 2001 From: Kohei Yoshida Date: Sat, 13 Aug 2011 01:20:31 -0400 Subject: Keep the container and object separate methods. ScVbaControl doesn't have any container instance to pass to the old method. --- vbahelper/source/msforms/vbacontrol.cxx | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'vbahelper/source') diff --git a/vbahelper/source/msforms/vbacontrol.cxx b/vbahelper/source/msforms/vbacontrol.cxx index c7e2c6ed3641..8bebe6050d44 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, xIf ); // TODO : FIX THIS!!! + evt.ScriptCode = xNameQuery->getCodeNameForObject( xIf ); evt.Arguments[ 0 ] = uno::makeAny( aEvt ); xScriptListener->firing( evt ); } -- cgit