equal
deleted
inserted
replaced
7 inclusion of the above copyright notice. This software may not |
7 inclusion of the above copyright notice. This software may not |
8 be provided or otherwise made available to, or used by, any |
8 be provided or otherwise made available to, or used by, any |
9 other person. No title to or ownership of the software is |
9 other person. No title to or ownership of the software is |
10 hereby transferred. |
10 hereby transferred. |
11 " |
11 " |
12 |
|
13 |
|
14 "{ Package: 'stx:libtool2' }" |
12 "{ Package: 'stx:libtool2' }" |
15 |
13 |
16 ResourceSpecEditor subclass:#UIPainter |
14 ResourceSpecEditor subclass:#UIPainter |
17 instanceVariableNames:'specSuperclassName treeView selectionPanel specTool layoutTool |
15 instanceVariableNames:'specSuperclassName treeView selectionPanel specTool layoutTool |
18 helpTool painterView painter' |
16 helpTool painterView painter' |
4877 "can drop ? -> delegate to canvas" |
4875 "can drop ? -> delegate to canvas" |
4878 |
4876 |
4879 ^ self canvas canDrop:aCollectionOfDropObjects |
4877 ^ self canvas canDrop:aCollectionOfDropObjects |
4880 ! |
4878 ! |
4881 |
4879 |
|
4880 canDrop:aCollectionOfDropObjects at:aPoint |
|
4881 "can drop ? -> delegate to canvas" |
|
4882 |
|
4883 ^ self canvas canDrop:aCollectionOfDropObjects at:aPoint |
|
4884 |
|
4885 "Created: / 13-10-2006 / 12:35:53 / cg" |
|
4886 ! |
|
4887 |
|
4888 drop:aCollectionOfDropObjects |
|
4889 "drop objects -> delegate to canvas" |
|
4890 |
|
4891 self canvas drop:aCollectionOfDropObjects |
|
4892 |
|
4893 "Created: / 13-10-2006 / 12:35:59 / cg" |
|
4894 ! |
|
4895 |
4882 drop:aCollectionOfDropObjects at:aPoint |
4896 drop:aCollectionOfDropObjects at:aPoint |
4883 "drop objects -> delegate to canvas" |
4897 "drop objects -> delegate to canvas" |
4884 |
4898 |
4885 self canvas drop:aCollectionOfDropObjects at:aPoint |
4899 self canvas drop:aCollectionOfDropObjects at:aPoint |
4886 ! ! |
4900 ! ! |