strepsirrhini/office-gobmx
9
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

#101048# ExecuteBasic(): Check if IDEShell still exists after execution

Browse source
This commit is contained in:
Andreas Bregas 2002-10-30 08:27:01 +00:00
parent a1d0c53d3d
commit 15f5fd1a97
1 changed files with 8 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
basctl/source/basicide/basides2.cxx
View file

@ -2,9 +2,9 @@
* *
* $RCSfile: basides2.cxx,v $ * $RCSfile: basides2.cxx,v $
* *
* $Revision: 1.6 $ * $Revision: 1.7 $
* *
* last change: $Author: tbe $ $Date: 2001-09-25 09:10:51 $ * last change: $Author: ab $ $Date: 2002-10-30 09:27:01 $
* *
* The Contents of this file are made available subject to the terms of * The Contents of this file are made available subject to the terms of
* either of the following licenses * either of the following licenses
@ -333,6 +333,9 @@ void __EXPORT BasicIDEShell::ShowCursor( FASTBOOL bOn )
((ModulWindow*)pCurWin)->ShowCursor( (BOOL)bOn ); ((ModulWindow*)pCurWin)->ShowCursor( (BOOL)bOn );
} }
// Hack for #101048
sal_Int32 getBasicIDEShellCount( void );
// Nur wenn Basicfenster oben: // Nur wenn Basicfenster oben:
void __EXPORT BasicIDEShell::ExecuteBasic( SfxRequest& rReq ) void __EXPORT BasicIDEShell::ExecuteBasic( SfxRequest& rReq )
{ {
@ -340,6 +343,8 @@ void __EXPORT BasicIDEShell::ExecuteBasic( SfxRequest& rReq )
return; return;
pCurWin->ExecuteCommand( rReq ); pCurWin->ExecuteCommand( rReq );
CheckWindows(); sal_Int32 nCount = getBasicIDEShellCount();
if( nCount )
CheckWindows();
} }