summaryrefslogtreecommitdiff
path: root/basic
diff options
context:
space:
mode:
authorNoel Power <npower@openoffice.org>2009-09-23 11:48:33 +0000
committerNoel Power <npower@openoffice.org>2009-09-23 11:48:33 +0000
commit4edd81dc5d6c859987a0c81ee15db9a5b375037a (patch)
tree460f601375cfb0be12d33866010f77ca8d4eb751 /basic
parent2e02ed6ffe96b029412c38c250db3a72eb5dbf40 (diff)
oops, remove last changes ( they are not to do with Application:Quit )
or at least not directly
Diffstat (limited to 'basic')
-rw-r--r--basic/source/classes/sbxmod.cxx17
1 files changed, 0 insertions, 17 deletions
diff --git a/basic/source/classes/sbxmod.cxx b/basic/source/classes/sbxmod.cxx
index e724995d1e..f00b9ad1a2 100644
--- a/basic/source/classes/sbxmod.cxx
+++ b/basic/source/classes/sbxmod.cxx
@@ -706,22 +706,6 @@ USHORT SbModule::Run( SbMethod* pMeth )
delete pRt;
pMOD = pOldMod;
- if ( pINST->nCallLvl == 0 && IsVBACompat() )
- {
- // VBA always ensure screenupdating is enabled after completing
- StarBASIC* pBasic = PTR_CAST(StarBASIC,GetParent());
- if ( pBasic && pBasic->IsDocBasic() )
- {
- uno::Any aUnoVar;
- ::rtl::OUString sVarName( ::rtl::OUString::createFromAscii( "ThisComponent" ) );
- SbUnoObject* pGlobs = dynamic_cast<SbUnoObject*>( pBasic->Find( sVarName, SbxCLASS_DONTCARE ) );
- if ( pGlobs )
- aUnoVar = pGlobs->getUnoAny();
- uno::Reference< frame::XModel > xModel( aUnoVar, uno::UNO_QUERY);
- if ( xModel.is() )
- xModel->unlockControllers();
- }
- }
if( bDelInst )
{
// #57841 Uno-Objekte, die in RTL-Funktionen gehalten werden,
@@ -746,7 +730,6 @@ USHORT SbModule::Run( SbMethod* pMeth )
pINST->nCallLvl--; // Call-Level wieder runter
StarBASIC::FatalError( SbERR_STACK_OVERFLOW );
}
-
if( bDelInst )
{
// #57841 Uno-Objekte, die in RTL-Funktionen gehalten werden,