equal
deleted
inserted
replaced
302 |handlerBlock| |
302 |handlerBlock| |
303 |
303 |
304 "try per signal handler. |
304 "try per signal handler. |
305 I may have been created from a QuerySignal" |
305 I may have been created from a QuerySignal" |
306 |
306 |
307 (handlerBlock := signal handlerBlock) notNil ifTrue:[ |
307 (handlerBlock := self creator handlerBlock) notNil ifTrue:[ |
308 "... and call it" |
308 "... and call it" |
309 ^ handlerBlock value:self. |
309 ^ handlerBlock value:self. |
310 ]. |
310 ]. |
311 ^ self defaultResumeValue |
311 ^ self defaultResumeValue |
312 |
312 |
373 ! ! |
373 ! ! |
374 |
374 |
375 !Notification class methodsFor:'documentation'! |
375 !Notification class methodsFor:'documentation'! |
376 |
376 |
377 version |
377 version |
378 ^ '$Header: /cvs/stx/stx/libbasic/Notification.st,v 1.29 2013-04-19 08:41:19 cg Exp $' |
378 ^ '$Header: /cvs/stx/stx/libbasic/Notification.st,v 1.30 2013-05-27 14:12:02 stefan Exp $' |
379 ! |
379 ! |
380 |
380 |
381 version_CVS |
381 version_CVS |
382 ^ '$Header: /cvs/stx/stx/libbasic/Notification.st,v 1.29 2013-04-19 08:41:19 cg Exp $' |
382 ^ '$Header: /cvs/stx/stx/libbasic/Notification.st,v 1.30 2013-05-27 14:12:02 stefan Exp $' |
383 ! ! |
383 ! ! |
384 |
384 |
385 |
385 |
386 Notification initialize! |
386 Notification initialize! |