--- a/UIPainterView.st Fri Oct 29 19:10:39 2010 +0200
+++ b/UIPainterView.st Wed Nov 03 07:44:01 2010 +0100
@@ -528,21 +528,24 @@
"/ newSel do:[:v| v raise].
self elementChangedSize:containerToPasteInto.
- "/ because the new-created view will destroy the handles, when it redraws itself,
- "/ give it a chance to do so, before we return. (bail out after half a second, in case of trouble)
- count := 0.
- [ (newSel conform:[:v | v shown]) or:[count > 50] ] whileFalse:[
+ "/ nil wg if embedded in a browser
+ self windowGroup notNil ifTrue:[
+ "/ because the new-created view will destroy the handles, when it redraws itself,
+ "/ give it a chance to do so, before we return. (bail out after half a second, in case of trouble)
+ count := 0.
+ [ (newSel conform:[:v | v shown]) or:[count > 50] ] whileFalse:[
+ self windowGroup repairDamage.
+ Delay waitForSeconds:0.01.
+ count := count+1.
+ ].
+ Delay waitForSeconds:0.01.
self windowGroup repairDamage.
- Delay waitForSeconds:0.01.
- count := count+1.
].
- Delay waitForSeconds:0.01.
- self windowGroup repairDamage.
newSel size == 1 ifTrue:[newSel := newSel at:1].
^ newSel
- "Modified: / 10.10.2001 / 14:15:12 / cg"
+ "Modified: / 03-11-2010 / 07:20:06 / cg"
!
pasteSpecifications:aSpecificationOrList into:aContainerOrNil keepLayout:keepLayout keepPosition:keepPosition at:aPointOrNilOrKeep