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

INTEGRATION: CWS vcl07 (1.23.20.1.16); FILE MERGED

Browse source 
2003/03/26 11:29:00 tbe 1.23.20.1.16.1: #106204# Breakpoint dialog cannot be accessed via Keyboard
This commit is contained in:
Vladimir Glazounov 2003-04-11 16:37:40 +00:00
parent e62123fac6
commit 5cba163749
1 changed files with 7 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
basctl/source/basicide/basides1.cxx
View file

@ -2,9 +2,9 @@
*
* $RCSfile: basides1.cxx,v $
*
* $Revision: 1.24 $
* $Revision: 1.25 $
*
* last change: $Author: hr $ $Date: 2003-03-18 16:17:05 $
* last change: $Author: vg $ $Date: 2003-04-11 17:37:40 $
*
* The Contents of this file are made available subject to the terms of
* either of the following licenses
@ -842,6 +842,7 @@ void __EXPORT BasicIDEShell::GetState(SfxItemSet &rSet)
case SID_BASICSTEPOVER:
case SID_BASICSTEPOUT:
case SID_BASICIDE_TOGGLEBRKPNT:
case SID_BASICIDE_MANAGEBRKPNTS:
{
if ( !pCurWin || !pCurWin->IsA( TYPE( ModulWindow ) ) )
rSet.DisableItem( nWh );
@ -1340,7 +1341,10 @@ IMPL_LINK( BasicIDEShell, AccelSelectHdl, Accelerator*, pAccel )
pDispatcher->Execute( SID_BASICSTEPINTO, SFX_CALLMODE_SYNCHRON );
break;
case KEY_F9:
pDispatcher->Execute( SID_BASICIDE_TOGGLEBRKPNT, SFX_CALLMODE_SYNCHRON );
if ( pAccel->GetCurKeyCode().IsShift() )
pDispatcher->Execute( SID_BASICIDE_TOGGLEBRKPNTENABLED, SFX_CALLMODE_SYNCHRON );
else
pDispatcher->Execute( SID_BASICIDE_TOGGLEBRKPNT, SFX_CALLMODE_SYNCHRON );
break;
default: bDone = FALSE;
}