--- a/ShowMeHowItWorks.st Thu Oct 17 15:47:47 2019 +0200
+++ b/ShowMeHowItWorks.st Fri Oct 18 23:10:44 2019 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
"{ Package: 'stx:libtool2' }"
"{ NameSpace: Smalltalk }"
@@ -66,7 +64,7 @@
ShowMeHowItWorks do:
#(
(language: de)
- (show: 'üben üben üben')
+ (show: 'üben üben üben')
(wait: 0.5)
(moveTo: NameOfComponent)
)
@@ -85,7 +83,7 @@
ShowMeHowItWorks do:
#(
(language: de)
- (show: 'üben üben üben')
+ (show: 'üben üben üben')
(wait: 0.5)
(moveTo: NameOfComponent)
)
@@ -107,7 +105,7 @@
ShowMeHowItWorks
do:#(
(language: de)
- (show: 'üben üben üben')
+ (show: 'üben üben üben')
(wait: 0.5)
(moveTo: NameOfComponent)
)
@@ -127,7 +125,7 @@
ShowMeHowItWorks
do:#(
(language: de)
- (show: 'üben üben üben')
+ (show: 'üben üben üben')
(wait: 0.5)
(moveTo: NameOfComponent)
)
@@ -476,16 +474,16 @@
targetPos := targetComponent topLeft + (1@1).
] ifFalse:[
where == #topCenter ifTrue:[
- targetPos := targetComponent topCenter + (0@1).
+ targetPos := targetComponent topCenter + (0@5).
] ifFalse:[
where == #center ifTrue:[
targetPos := targetComponent center
] ifFalse:[
where == #bottomCenter ifTrue:[
- targetPos := targetComponent bottomCenter - (0 @ 1)
+ targetPos := targetComponent bottomCenter - (0 @ 5)
] ifFalse:[
where == #bottomLeft ifTrue:[
- targetPos := targetComponent bottomLeft + (1 @ -1)
+ targetPos := targetComponent bottomLeft + (1 @ -5)
] ifFalse:[
self error:'where is this'
].