--- a/UIPainter.st Fri Jul 18 11:47:14 2008 +0200
+++ b/UIPainter.st Fri Jul 18 11:47:47 2008 +0200
@@ -4355,8 +4355,12 @@
]
] ifFalse:[
spec useDefaultExtent:false.
+ spec usePreferredWidth:(layoutTool aspectFor:#usePreferredWidth) value.
+ spec usePreferredHeight:(layoutTool aspectFor:#usePreferredHeight) value.
+ spec useDynamicPreferredWidth:(layoutTool aspectFor:#useDynamicPreferredWidth) value.
+ spec useDynamicPreferredHeight:(layoutTool aspectFor:#useDynamicPreferredHeight) value.
painter setLayout:layout
- ]
+ ].
]
] ifFalse:[
self isHelpToolSelected ifTrue:[
@@ -5114,9 +5118,9 @@
|classAndSelector|
self askForSectionModification.
- self hasSpecClassAndSelector ifTrue:[
- self askForModification ifFalse:[^ false].
- ].
+"/ self hasSpecClassAndSelector ifTrue:[
+"/ self askForModification ifFalse:[^ false].
+"/ ].
classAndSelector := ResourceSelectionBrowser
request: 'Save Window Spec In Class'
@@ -5739,7 +5743,7 @@
drop:aDropContext at:aPoint
"drop objects -> delegate to canvas"
- self canvas drop:aDropContext at:aPoint
+ self canvas drop:aDropContext at:nil
"Modified: / 13-10-2006 / 16:09:07 / cg"
!
@@ -5755,7 +5759,7 @@
dropObjects:aCollectionOfDropObjects at:aPoint
"drop objects -> delegate to canvas"
- self canvas dropObjects:aCollectionOfDropObjects at:aPoint
+ self canvas dropObjects:aCollectionOfDropObjects at:nil
"Created: / 13-10-2006 / 16:08:56 / cg"
! !