mirror of
https://github.com/gnustep/libs-steptalk.git
synced 2025-02-23 03:20:57 +00:00
25 lines
411 B
Smalltalk
25 lines
411 B
Smalltalk
|
[|
|
||
|
|
|
||
|
|
main
|
||
|
|
|center|
|
||
|
|
|
||
|
|
center := NSDistributedNotificationCenter defaultCenter.
|
||
|
|
|
||
|
|
Transcript showLine:'Registering'.
|
||
|
|
|
||
|
|
center addObserver:self
|
||
|
|
selector:#notification:
|
||
|
|
name:nil
|
||
|
|
object:'s'.
|
||
|
|
|
||
|
|
NSRunLoop currentRunLoop run.
|
||
|
|
!
|
||
|
|
|
||
|
|
notification:notif
|
||
|
|
|
||
|
|
Transcript showLine:'Notification received: ', (notif description).
|
||
|
|
|
||
|
|
^self
|
||
|
|
|
||
|
|
]
|