[Pkg] The Trunk: Kernel-mt.1283.mcz
commits at source.squeak.org
commits at source.squeak.org
Wed Nov 27 09:25:56 UTC 2019
Marcel Taeumel uploaded a new version of Kernel to project The Trunk:
http://source.squeak.org/trunk/Kernel-mt.1283.mcz
==================== Summary ====================
Name: Kernel-mt.1283
Author: mt
Time: 27 November 2019, 10:25:51.203363 am
UUID: 04694a24-76a1-a941-b664-645ffc7f27e6
Ancestors: Kernel-nice.1282
Removes Kernel -> Regex dependency.
=============== Diff against Kernel-nice.1282 ===============
Item was changed:
----- Method: BlockClosure>>valueSupplyingAnswers: (in category 'evaluating') -----
valueSupplyingAnswers: aListOfPairs
"evaluate the block using a list of questions / answers that might be called upon to
automatically respond to Object>>confirm: or FillInTheBlank requests"
^self
on: ProvideAnswerNotification
do: [ :notification |
| caption |
caption := notification messageText withSeparatorsCompacted. "to remove new lines"
aListOfPairs
detect: [ :each |
caption = each first
or: [ (caption includesSubstring: each first caseSensitive: false)
or: [ (each first match: caption)
or: [ (caption respondsTo: #matchesRegex:)
+ and: [ [caption matchesRegex: each first] on: Error do: [false] ] ] ] ] ]
- and: [ [caption matchesRegex: each first] on: RegexSyntaxError do: [false] ] ] ] ] ]
ifFound: [ :answer | notification resume: answer second ]
ifNone: [
(ProvideAnswerNotification signal: notification messageText)
ifNil: [ notification resume ]
ifNotNil: [ :outerAnswer | notification resume: outerAnswer ] ] ]!
More information about the Packages
mailing list