mirror of
https://github.com/gnustep/libs-steptalk.git
synced 2025-02-21 02:31:01 +00:00
81d85158bc
git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/steptalk/trunk@15652 72102866-910b-0410-8b05-ffd578937521
24 lines
411 B
Smalltalk
24 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
|
|
|
|
]
|