steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

macos: Update -> to send:

modern-harvey3
Doug Coleman 2018-12-16 13:08:43 -06:00
parent 434879a802
commit 3ac71a1317
2 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/ui/backend/cocoa/views/views.factor
View File

@ -198,7 +198,7 @@ M: send-touchbar-command send-queued-gesture
cached-lines get-global clear-assoc cached-lines get-global clear-assoc
] [ drop ] if ] [ drop ] if
self -> update self send: update
] when ] when
] ; ] ;

10
extra/notifications/macos/macos.factor
View File

@ -7,13 +7,13 @@ IMPORT: NSUserNotification
IMPORT: NSUserNotificationCenter IMPORT: NSUserNotificationCenter
:: make-notification ( title text -- notification ) :: make-notification ( title text -- notification )
NSUserNotification -> alloc -> init -> autorelease NSUserNotification send: alloc send: init send: autorelease
[ title <NSString> -> setTitle: ] keep [ title <NSString> send: \setTitle: ] keep
[ text <NSString> -> setInformativeText: ] keep ; [ text <NSString> send: \setInformativeText: ] keep ;
: send-notification ( title text -- ) : send-notification ( title text -- )
make-notification make-notification
[ [
NSUserNotificationCenter -> defaultUserNotificationCenter NSUserNotificationCenter send: defaultUserNotificationCenter
] dip ] dip
-> deliverNotification: ; send: \deliverNotification: ;