@@ -30,14 +30,14 @@ GtSpotterByScripterExamples >> elementOnStartWithExceptionsInSearch [
30
30
{ #category : #accessing }
31
31
GtSpotterByScripterExamples >> scripter [
32
32
< gtExample>
33
-
33
+ < return: #BlScripter >
34
34
^ BlScripter new
35
35
]
36
36
37
37
{ #category : #accessing }
38
38
GtSpotterByScripterExamples >> spotterElementOnStart [
39
39
< gtExample>
40
-
40
+ < return: #BlScripter >
41
41
^ self spotterElementOnStart: GtWorldSpotterSearchStart new
42
42
]
43
43
@@ -57,13 +57,14 @@ GtSpotterByScripterExamples >> spotterElementOnStart: aStartObject [
57
57
{ #category : #accessing }
58
58
GtSpotterByScripterExamples >> spotterElementOnStartSample [
59
59
< gtExample>
60
-
60
+ < return: #BlScripter >
61
61
^ self spotterElementOnStart: GtSpotterStartSample new
62
62
]
63
63
64
64
{ #category : #accessing }
65
65
GtSpotterByScripterExamples >> spotterElementOnStartSampleActOnFirstCandidate [
66
66
< gtExample>
67
+ < return: #BlScripter >
67
68
| scripter actOnEvents actOn actOnHandler |
68
69
scripter := self spotterElementOnStartSample.
69
70
@@ -76,10 +77,7 @@ GtSpotterByScripterExamples >> spotterElementOnStartSampleActOnFirstCandidate [
76
77
send: #onActed:
77
78
to: actOnHandler.
78
79
79
- scripter
80
- mouseMoveOverStep: [ :s |
81
- s
82
- id: GtSpotterCandidateElementId index: 1 ].
80
+ scripter mouseMoveOverStep: [ :s | s id: GtSpotterCandidateElementId index: 1 ].
83
81
84
82
scripter
85
83
mouseMoveOverStep: [ :s |
@@ -123,6 +121,7 @@ GtSpotterByScripterExamples >> spotterElementOnStartSampleActOnFirstCandidate [
123
121
{ #category : #accessing }
124
122
GtSpotterByScripterExamples >> spotterElementOnStartSampleActOnFirstCategory [
125
123
< gtExample>
124
+ < return: #BlScripter >
126
125
| scripter actOnEvents actOn actOnHandler |
127
126
scripter := self spotterElementOnStartSample.
128
127
@@ -135,10 +134,7 @@ GtSpotterByScripterExamples >> spotterElementOnStartSampleActOnFirstCategory [
135
134
send: #onActed:
136
135
to: actOnHandler.
137
136
138
- scripter
139
- mouseMoveOverStep: [ :s |
140
- s
141
- id: GtSpotterCategoryElementId index: 1 ].
137
+ scripter mouseMoveOverStep: [ :s | s id: GtSpotterCategoryElementId index: 1 ].
142
138
143
139
scripter
144
140
mouseMoveOverStep: [ :s |
@@ -184,6 +180,7 @@ GtSpotterByScripterExamples >> spotterElementOnStartSampleActOnFirstCategory [
184
180
{ #category : #accessing }
185
181
GtSpotterByScripterExamples >> spotterElementOnStartSampleActOnSecondCandidateWithDefaultObjectActOn [
186
182
< gtExample>
183
+ < return: #BlScripter >
187
184
| scripter actOnEvents actOn actOnHandler |
188
185
scripter := self spotterElementOnStartSample.
189
186
@@ -196,10 +193,7 @@ GtSpotterByScripterExamples >> spotterElementOnStartSampleActOnSecondCandidateWi
196
193
send: #onActed:
197
194
to: actOnHandler.
198
195
199
- scripter
200
- mouseMoveOverStep: [ :s |
201
- s
202
- id: GtSpotterCandidateElementId index: 2 ].
196
+ scripter mouseMoveOverStep: [ :s | s id: GtSpotterCandidateElementId index: 2 ].
203
197
204
198
scripter
205
199
mouseMoveOverStep: [ :s |
@@ -231,6 +225,7 @@ GtSpotterByScripterExamples >> spotterElementOnStartSampleActOnSecondCandidateWi
231
225
{ #category : #accessing }
232
226
GtSpotterByScripterExamples >> spotterElementOnStartSampleActOnSecondCategoryWithDefaultCategoryActOn [
233
227
< gtExample>
228
+ < return: #BlScripter >
234
229
| scripter actOnEvents actOn actOnHandler |
235
230
scripter := self spotterElementOnStartSample.
236
231
@@ -243,10 +238,7 @@ GtSpotterByScripterExamples >> spotterElementOnStartSampleActOnSecondCategoryWit
243
238
send: #onActed:
244
239
to: actOnHandler.
245
240
246
- scripter
247
- mouseMoveOverStep: [ :s |
248
- s
249
- id: GtSpotterCategoryElementId index: 2 ].
241
+ scripter mouseMoveOverStep: [ :s | s id: GtSpotterCategoryElementId index: 2 ].
250
242
251
243
scripter
252
244
mouseMoveOverStep: [ :s |
@@ -278,6 +270,7 @@ GtSpotterByScripterExamples >> spotterElementOnStartSampleActOnSecondCategoryWit
278
270
{ #category : #accessing }
279
271
GtSpotterByScripterExamples >> spotterElementOnStartSampleCheckCandidates [
280
272
< gtExample>
273
+ < return: #BlScripter >
281
274
| scripter |
282
275
scripter := self spotterElementOnStartSample.
283
276
@@ -301,6 +294,7 @@ GtSpotterByScripterExamples >> spotterElementOnStartSampleCheckCandidates [
301
294
{ #category : #accessing }
302
295
GtSpotterByScripterExamples >> spotterElementOnStartSampleCheckCategories [
303
296
< gtExample>
297
+ < return: #BlScripter >
304
298
| scripter |
305
299
scripter := self spotterElementOnStartSample.
306
300
@@ -331,6 +325,7 @@ GtSpotterByScripterExamples >> spotterElementOnStartSampleCheckCategories [
331
325
{ #category : #accessing }
332
326
GtSpotterByScripterExamples >> spotterElementOnStartSampleCheckSelection [
333
327
< gtExample>
328
+ < return: #BlScripter >
334
329
| scripter |
335
330
scripter := self spotterElementOnStartSample.
336
331
@@ -366,6 +361,7 @@ GtSpotterByScripterExamples >> spotterElementOnStartSampleCheckSelection [
366
361
{ #category : #accessing }
367
362
GtSpotterByScripterExamples >> spotterElementOnStartWithAPIHasPreview [
368
363
< gtExample>
364
+ < return: #BlScripter >
369
365
| scripter |
370
366
scripter := self spotterElementOnStart: GtSpotterStartWithAPI new .
371
367
@@ -394,6 +390,7 @@ GtSpotterByScripterExamples >> spotterElementOnStartWithAPIHasPreview [
394
390
{ #category : #accessing }
395
391
GtSpotterByScripterExamples >> spotterElementOnStartWithExceptionInItemName [
396
392
< gtExample>
393
+ < return: #BlScripter >
397
394
| scripter |
398
395
scripter := self
399
396
spotterElementOnStart: GtSpotterStartWithExceptionInItemName new .
@@ -412,6 +409,7 @@ GtSpotterByScripterExamples >> spotterElementOnStartWithExceptionInItemName [
412
409
{ #category : #accessing }
413
410
GtSpotterByScripterExamples >> spotterElementOnStartWithExceptionsInSearch [
414
411
< gtExample>
412
+ < return: #BlScripter >
415
413
| scripter |
416
414
scripter := self spotterElementOnStart: GtSpotterStartWithExceptionInSearch new .
417
415
@@ -468,6 +466,7 @@ GtSpotterByScripterExamples >> spotterElementOnStartWithExceptionsInSearch [
468
466
{ #category : #accessing }
469
467
GtSpotterByScripterExamples >> spotterElementOnStartWithNilItems [
470
468
< gtExample>
469
+ < return: #BlScripter >
471
470
| scripter |
472
471
scripter := self spotterElementOnStart: GtSpotterStartWithNilItems new .
473
472
0 commit comments