mirror of
https://github.com/gnustep/libs-steptalk.git
synced 2025-02-23 11:31:01 +00:00
25 lines
438 B
Smalltalk
25 lines
438 B
Smalltalk
|
" Notification example "
|
||
|
|
[|
|
||
|
|
|
||
|
|
main
|
||
|
|
| nc |
|
||
|
|
|
||
|
|
nc := NSNotificationCenter defaultCenter.
|
||
|
|
|
||
|
|
Transcript showLine:'Registering for notification'.
|
||
|
|
nc addObserver:self selector:#notification: name:'Notification' object:nil.
|
||
|
|
|
||
|
|
Transcript showLine:'Posting notification'.
|
||
|
|
nc postNotificationName:'Notification' object:nil.
|
||
|
|
|
||
|
|
^self
|
||
|
|
!
|
||
|
|
|
||
|
|
notification:notif
|
||
|
|
|
||
|
|
Transcript showLine:'Notification received'.
|
||
|
|
|
||
|
|
^self
|
||
|
|
|
||
|
|
]
|