equal
deleted
inserted
replaced
242 |
242 |
243 defaultAction |
243 defaultAction |
244 "the default action is to return the default value. |
244 "the default action is to return the default value. |
245 Subclasses may redefine this" |
245 Subclasses may redefine this" |
246 |
246 |
247 ^ self defaultValue |
247 ^ self defaultResumeValue |
248 |
248 |
249 "Modified: / 23.7.1999 / 15:13:34 / stefan" |
249 "Modified: / 23.7.1999 / 15:13:34 / stefan" |
250 ! |
|
251 |
|
252 defaultValue |
|
253 "the default actions default return value." |
|
254 |
|
255 ^ nil |
|
256 ! ! |
250 ! ! |
257 |
251 |
258 !Notification class methodsFor:'documentation'! |
252 !Notification class methodsFor:'documentation'! |
259 |
253 |
260 version |
254 version |
261 ^ '$Header: /cvs/stx/stx/libbasic/Notification.st,v 1.11 2002-03-01 14:33:58 cg Exp $' |
255 ^ '$Header: /cvs/stx/stx/libbasic/Notification.st,v 1.12 2002-03-07 07:53:07 cg Exp $' |
262 ! ! |
256 ! ! |
263 Notification initialize! |
257 Notification initialize! |