459 #(#MenuItem |
459 #(#MenuItem |
460 #label: 'Move Up' |
460 #label: 'Move Up' |
461 #value: #doStepUp |
461 #value: #doStepUp |
462 #activeHelpKey: #editMoveUp |
462 #activeHelpKey: #editMoveUp |
463 #enabled: #canStepOverChannel |
463 #enabled: #canStepOverChannel |
464 #labelImage: #(#ResourceRetriever #ToolApplicationModel #upIcon 'Move Up') |
464 #labelImage: #(#ResourceRetriever #Icon #upIcon 'Move Up') |
465 ) |
465 ) |
466 #(#MenuItem |
466 #(#MenuItem |
467 #label: 'Move Down' |
467 #label: 'Move Down' |
468 #value: #doStepDown |
468 #value: #doStepDown |
469 #activeHelpKey: #editMoveDown |
469 #activeHelpKey: #editMoveDown |
470 #enabled: #canStepOverChannel |
470 #enabled: #canStepOverChannel |
471 #labelImage: #(#ResourceRetriever #ToolApplicationModel #downIcon 'Move Down') |
471 #labelImage: #(#ResourceRetriever #Icon #downIcon 'Move Down') |
472 ) |
472 ) |
473 #(#MenuItem |
473 #(#MenuItem |
474 #label: 'Move In' |
474 #label: 'Move In' |
475 #value: #doStepIn |
475 #value: #doStepIn |
476 #activeHelpKey: #editMoveIn |
476 #activeHelpKey: #editMoveIn |
477 #enabled: #canStepInChannel |
477 #enabled: #canStepInChannel |
478 #labelImage: #(#ResourceRetriever #ToolApplicationModel #downRightIcon 'Move In') |
478 #labelImage: #(#ResourceRetriever #Icon #downRightIcon 'Move In') |
479 ) |
479 ) |
480 #(#MenuItem |
480 #(#MenuItem |
481 #label: 'Move Out' |
481 #label: 'Move Out' |
482 #value: #doStepOut |
482 #value: #doStepOut |
483 #activeHelpKey: #editMoveOut |
483 #activeHelpKey: #editMoveOut |
484 #enabled: #canStepOutChannel |
484 #enabled: #canStepOutChannel |
485 #labelImage: #(#ResourceRetriever #ToolApplicationModel #leftDownIcon 'Move Out') |
485 #labelImage: #(#ResourceRetriever #Icon #leftDownIcon 'Move Out') |
486 ) |
486 ) |
487 ) nil |
487 ) nil |
488 nil |
488 nil |
489 ) |
489 ) |
490 ! |
490 ! |
511 #(#MenuItem |
511 #(#MenuItem |
512 #label: 'New' |
512 #label: 'New' |
513 #isButton: true |
513 #isButton: true |
514 #value: #doNew |
514 #value: #doNew |
515 #activeHelpKey: #fileNew |
515 #activeHelpKey: #fileNew |
516 #labelImage: #(#ResourceRetriever nil #newIcon) |
516 #labelImage: #(#ResourceRetriever #Icon #newIcon) |
517 ) |
517 ) |
518 #(#MenuItem |
518 #(#MenuItem |
519 #label: 'Load' |
519 #label: 'Load' |
520 #isButton: true |
520 #isButton: true |
521 #value: #doLoad |
521 #value: #doLoad |
522 #activeHelpKey: #fileLoad |
522 #activeHelpKey: #fileLoad |
523 #labelImage: #(#ResourceRetriever nil #loadIcon) |
523 #labelImage: #(#ResourceRetriever #Icon #loadIcon) |
524 ) |
524 ) |
525 #(#MenuItem |
525 #(#MenuItem |
526 #label: 'Save' |
526 #label: 'Save' |
527 #isButton: true |
527 #isButton: true |
528 #value: #doSave |
528 #value: #doSave |
529 #activeHelpKey: #fileSave |
529 #activeHelpKey: #fileSave |
530 #labelImage: #(#ResourceRetriever nil #saveIcon) |
530 #labelImage: #(#ResourceRetriever #Icon #saveIcon) |
531 ) |
531 ) |
532 #(#MenuItem |
532 #(#MenuItem |
533 #label: '' |
533 #label: '' |
534 ) |
534 ) |
535 #(#MenuItem |
535 #(#MenuItem |
536 #label: 'Cut' |
536 #label: 'Cut' |
537 #isButton: true |
537 #isButton: true |
538 #value: #doCut |
538 #value: #doCut |
539 #activeHelpKey: #editCut |
539 #activeHelpKey: #editCut |
540 #enabled: #valueOfCanCut |
540 #enabled: #valueOfCanCut |
541 #labelImage: #(#ResourceRetriever nil #cutIcon) |
541 #labelImage: #(#ResourceRetriever #Icon #cutIcon) |
542 ) |
542 ) |
543 #(#MenuItem |
543 #(#MenuItem |
544 #label: 'Copy' |
544 #label: 'Copy' |
545 #isButton: true |
545 #isButton: true |
546 #value: #doCopy |
546 #value: #doCopy |
547 #activeHelpKey: #editCopy |
547 #activeHelpKey: #editCopy |
548 #enabled: #valueOfCanCopy |
548 #enabled: #valueOfCanCopy |
549 #labelImage: #(#ResourceRetriever nil #copyIcon) |
549 #labelImage: #(#ResourceRetriever #Icon #copyIcon) |
550 ) |
550 ) |
551 #(#MenuItem |
551 #(#MenuItem |
552 #label: 'Paste' |
552 #label: 'Paste' |
553 #isButton: true |
553 #isButton: true |
554 #value: #doPaste |
554 #value: #doPaste |
555 #activeHelpKey: #editPaste |
555 #activeHelpKey: #editPaste |
556 #enabled: #valueOfCanPaste |
556 #enabled: #valueOfCanPaste |
557 #labelImage: #(#ResourceRetriever nil #pasteIcon) |
557 #labelImage: #(#ResourceRetriever #Icon #pasteIcon) |
558 ) |
558 ) |
559 #(#MenuItem |
559 #(#MenuItem |
560 #label: 'Delete' |
560 #label: 'Delete' |
561 #isButton: true |
561 #isButton: true |
562 #value: #doDelete |
562 #value: #doDelete |
563 #activeHelpKey: #editDelete |
563 #activeHelpKey: #editDelete |
564 #enabled: #valueOfCanCut |
564 #enabled: #valueOfCanCut |
565 #labelImage: #(#ResourceRetriever nil #deleteIcon) |
565 #labelImage: #(#ResourceRetriever #Icon #deleteIcon) |
566 ) |
566 ) |
567 #(#MenuItem |
567 #(#MenuItem |
568 #label: '' |
568 #label: '' |
569 ) |
569 ) |
570 #(#MenuItem |
570 #(#MenuItem |
590 #label: 'Move Up' |
590 #label: 'Move Up' |
591 #isButton: true |
591 #isButton: true |
592 #value: #doStepUp |
592 #value: #doStepUp |
593 #activeHelpKey: #editMoveUp |
593 #activeHelpKey: #editMoveUp |
594 #enabled: #canStepOverChannel |
594 #enabled: #canStepOverChannel |
595 #labelImage: #(#ResourceRetriever nil #upIcon) |
595 #labelImage: #(#ResourceRetriever #Icon #upIcon) |
596 ) |
596 ) |
597 #(#MenuItem |
597 #(#MenuItem |
598 #label: 'Move Down' |
598 #label: 'Move Down' |
599 #isButton: true |
599 #isButton: true |
600 #value: #doStepDown |
600 #value: #doStepDown |
601 #activeHelpKey: #editMoveDown |
601 #activeHelpKey: #editMoveDown |
602 #enabled: #canStepOverChannel |
602 #enabled: #canStepOverChannel |
603 #labelImage: #(#ResourceRetriever nil #downIcon) |
603 #labelImage: #(#ResourceRetriever #Icon #downIcon) |
604 ) |
604 ) |
605 #(#MenuItem |
605 #(#MenuItem |
606 #label: 'Move In' |
606 #label: 'Move In' |
607 #isButton: true |
607 #isButton: true |
608 #value: #doStepIn |
608 #value: #doStepIn |
609 #activeHelpKey: #editMoveIn |
609 #activeHelpKey: #editMoveIn |
610 #enabled: #canStepInChannel |
610 #enabled: #canStepInChannel |
611 #labelImage: #(#ResourceRetriever nil #downRightIcon) |
611 #labelImage: #(#ResourceRetriever #Icon #downRightIcon) |
612 ) |
612 ) |
613 #(#MenuItem |
613 #(#MenuItem |
614 #label: 'Move Out' |
614 #label: 'Move Out' |
615 #isButton: true |
615 #isButton: true |
616 #value: #doStepOut |
616 #value: #doStepOut |
617 #activeHelpKey: #editMoveOut |
617 #activeHelpKey: #editMoveOut |
618 #enabled: #canStepOutChannel |
618 #enabled: #canStepOutChannel |
619 #labelImage: #(#ResourceRetriever nil #leftDownIcon) |
619 #labelImage: #(#ResourceRetriever #Icon #leftDownIcon) |
620 ) |
620 ) |
621 ) nil |
621 ) nil |
622 nil |
622 nil |
623 ) |
623 ) |
624 ! ! |
624 ! ! |