Joshua Gargus uploaded a new version of Kernel to project The Trunk: http://source.squeak.org/trunk/Kernel-jcg.439.mcz
==================== Summary ====================
Name: Kernel-jcg.439 Author: jcg Time: 6 April 2010, 1:42:28.455 am UUID: 6055c684-bed4-44a4-9da3-a55fc22de5b6 Ancestors: Kernel-jcg.438
Fix Promise to address failing test added in KernelTests-jcg.146.
=============== Diff against Kernel-jcg.438 ===============
Item was changed: ----- Method: Promise>>waitTimeoutMSecs: (in category 'waiting') ----- waitTimeoutMSecs: msecs "Wait for at most the given number of milliseconds for this promise to resolve. Answer true if it is resolved, false otherwise." | sema delay | sema := Semaphore new. + self whenResolved: [sema signal]. - self whenComplete:[sema signal]. delay := Delay timeoutSemaphore: sema afterMSecs: msecs. [sema wait] ensure: [delay unschedule]. ^isResolved!