Nicolas Cellier uploaded a new version of ToolBuilder-Kernel to project The Trunk:
http://source.squeak.org/trunk/ToolBuilder-Kernel-nice.60.mcz==================== Summary ====================
Name: ToolBuilder-Kernel-nice.60
Author: nice
Time: 8 December 2013, 2:23:04.674 pm
UUID: 86949a07-725b-4a27-a7cd-a827c74f48be
Ancestors: ToolBuilder-Kernel-fbs.59
Classify some as yet unclassified methods
=============== Diff against ToolBuilder-Kernel-fbs.59 ===============
Item was changed:
+ ----- Method: ProgressInitiationException>>defaultAction (in category 'handling') -----
- ----- Method: ProgressInitiationException>>defaultAction (in category 'as yet unclassified') -----
defaultAction
self resume!
Item was changed:
+ ----- Method: ProgressInitiationException>>defaultResumeValue (in category 'handling') -----
- ----- Method: ProgressInitiationException>>defaultResumeValue (in category 'as yet unclassified') -----
defaultResumeValue
^ UIManager default
displayProgress: progressTitle
at: aPoint
from: minVal
to: maxVal
during: workBlock!
Item was changed:
+ ----- Method: ProgressInitiationException>>display:at:from:to:during: (in category 'initialize-release') -----
- ----- Method: ProgressInitiationException>>display:at:from:to:during: (in category 'as yet unclassified') -----
display: argString at: argPoint from: argMinVal to: argMaxVal during: argWorkBlock
progressTitle := argString.
aPoint := argPoint.
minVal := argMinVal.
maxVal := argMaxVal.
workBlock := argWorkBlock.
^self signal!
Item was changed:
+ ----- Method: ProgressInitiationException>>sendNotificationsTo: (in category 'initialize-release') -----
- ----- Method: ProgressInitiationException>>sendNotificationsTo: (in category 'as yet unclassified') -----
sendNotificationsTo: aNewBlock
self resume: (
workBlock value: [ :barVal |
aNewBlock value: minVal value: maxVal value: barVal
]
)
!