--- a/ShowMeHowItWorks.st Tue Feb 11 09:49:57 2020 +0100
+++ b/ShowMeHowItWorks.st Thu Feb 13 22:06:12 2020 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
"
COPYRIGHT (c) 2018 by eXept Software AG
All Rights Reserved
@@ -20,7 +18,7 @@
lastResult voice translate language verifying
closeApplicationWhenFinished defaultComponentWaitTime ui
theShowFile defaultElementTimeout applicationStack pronunciations'
- classVariableNames:'IntroShownCount DebugMode StartLabel'
+ classVariableNames:'IntroShownCount DebugMode StartLabel Verify'
poolDictionaries:''
category:'Interface-Help'
!
@@ -167,7 +165,7 @@
ShowMeHowItWorks do:
#(
(language: de)
- (show: 'üben üben üben')
+ (show: 'üben üben üben')
(wait: 0.5)
(moveTo: NameOfComponent)
)
@@ -188,7 +186,7 @@
ShowMeHowItWorks do:
#(
(language: de)
- (show: 'üben üben üben')
+ (show: 'üben üben üben')
(wait: 0.5)
(moveTo: NameOfComponent)
)
@@ -207,7 +205,7 @@
ShowMeHowItWorks do:
#(
(language: de)
- (show: 'üben üben üben')
+ (show: 'üben üben üben')
(wait: 0.5)
(moveTo: NameOfComponent)
)
@@ -229,7 +227,7 @@
ShowMeHowItWorks
do:#(
(language: de)
- (show: 'üben üben üben')
+ (show: 'üben üben üben')
(wait: 0.5)
(moveTo: NameOfComponent)
)
@@ -249,7 +247,7 @@
ShowMeHowItWorks
do:#(
(language: de)
- (show: 'üben üben üben')
+ (show: 'üben üben üben')
(wait: 0.5)
(moveTo: NameOfComponent)
)
@@ -2290,6 +2288,8 @@
!
verify:specArray
+ (Verify ? false) ifFalse:[^ self].
+
"/ run in verifying mode
verifying := true.
[