equal
deleted
inserted
replaced
1388 itemValue: doContinue |
1388 itemValue: doContinue |
1389 nameKey: Continue |
1389 nameKey: Continue |
1390 shortcutKey: DebuggerContinue |
1390 shortcutKey: DebuggerContinue |
1391 ) |
1391 ) |
1392 (MenuItem |
1392 (MenuItem |
1393 label: 'Next (Line-Step)' |
1393 label: 'Debug_Next' |
1394 itemValue: doNext |
1394 itemValue: doNext |
1395 shortcutKey: DebuggerNext |
1395 shortcutKey: DebuggerNext |
1396 ) |
1396 ) |
1397 (MenuItem |
1397 (MenuItem |
1398 label: 'Step' |
1398 label: 'Debug_Step' |
1399 itemValue: doStep |
1399 itemValue: doStep |
1400 shortcutKey: DebuggerStep |
1400 shortcutKey: DebuggerStep |
1401 ) |
1401 ) |
1402 (MenuItem |
1402 (MenuItem |
1403 label: 'Send' |
1403 label: 'Debug_Send' |
1404 itemValue: doSend |
1404 itemValue: doSend |
1405 shortcutKey: DebuggerSend |
1405 shortcutKey: DebuggerSend |
1406 ) |
1406 ) |
1407 (MenuItem |
1407 (MenuItem |
1408 label: '-' |
1408 label: '-' |
1469 ) |
1469 ) |
1470 (MenuItem |
1470 (MenuItem |
1471 label: '-' |
1471 label: '-' |
1472 ) |
1472 ) |
1473 (MenuItem |
1473 (MenuItem |
1474 label: 'Terminate' |
1474 label: 'Debug_Terminate' |
1475 itemValue: doTerminate |
1475 itemValue: doTerminate |
1476 ) |
1476 ) |
1477 (MenuItem |
1477 (MenuItem |
1478 label: 'Hard Terminate (Danger)' |
1478 label: 'Hard Terminate (Danger)' |
1479 itemValue: quickTerminate |
1479 itemValue: quickTerminate |
3779 "Created: / 17.11.2001 / 20:58:22 / cg" |
3779 "Created: / 17.11.2001 / 20:58:22 / cg" |
3780 ! |
3780 ! |
3781 |
3781 |
3782 initializeSendButtonIn:bpanel |
3782 initializeSendButtonIn:bpanel |
3783 sendButton := Button |
3783 sendButton := Button |
3784 label:(resources string:'Send') , (self shortKeyStringForAction: #DebuggerSend) |
3784 label:(resources string:'Debug_Send') , (self shortKeyStringForAction: #DebuggerSend) |
3785 action:[ |
3785 action:[ |
3786 sendButton turnOff. |
3786 sendButton turnOff. |
3787 self doSend |
3787 self doSend |
3788 ] |
3788 ] |
3789 in:bpanel. |
3789 in:bpanel. |
3790 |
3790 |
3791 sendButton name:'sendButton'. |
3791 sendButton name:'sendButton'. |
3792 |
3792 |
3793 "Created: / 17-11-2001 / 21:01:20 / cg" |
3793 "Created: / 17-11-2001 / 21:01:20 / cg" |
3794 "Modified: / 11-05-2017 / 21:05:40 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
3794 "Modified: / 25-05-2017 / 23:16:50 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
3795 ! |
3795 ! |
3796 |
3796 |
3797 initializeStepButtonIn:bpanel |
3797 initializeStepButtonIn:bpanel |
3798 stepButton := Button |
3798 stepButton := Button |
3799 label:(resources string:'Debug_Step') |
3799 label:(resources string:'Debug_Step') |