equal
deleted
inserted
replaced
751 |
751 |
752 v := self selectedWorkspacesTextView. |
752 v := self selectedWorkspacesTextView. |
753 ^ v notNil and:[v selectionAsString size > 0] |
753 ^ v notNil and:[v selectionAsString size > 0] |
754 ! |
754 ! |
755 |
755 |
|
756 hasSelectionInActiveWorkspaceAndEditorIsNotReadonly |
|
757 |v| |
|
758 |
|
759 v := self selectedWorkspacesTextView. |
|
760 ^ v notNil and:[v enabled and:[v selectionAsString size > 0]] |
|
761 ! |
|
762 |
756 hasTextInActiveWorkspace |
763 hasTextInActiveWorkspace |
757 |v| |
764 |v| |
758 |
765 |
759 v := self selectedWorkspacesTextView. |
766 v := self selectedWorkspacesTextView. |
760 ^ v notNil |
767 ^ v notNil |