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

ui.backend.cocoa: simplify system-alert implementation now that callbacks bug has been fixed

db4
Slava Pestov 2011-04-16 19:12:08 -07:00
parent cbbdd712fc
commit d1666854e8
1 changed files with 1 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
basis/ui/backend/cocoa/cocoa.factor
View File

@ -217,7 +217,6 @@ M: cocoa-ui-backend beep ( -- )
NSBeep ; NSBeep ;
M: cocoa-ui-backend system-alert M: cocoa-ui-backend system-alert
invalidate-run-loop-timers
NSAlert -> alloc -> init -> autorelease [ NSAlert -> alloc -> init -> autorelease [
{ {
[ swap <NSString> -> setInformativeText: ] [ swap <NSString> -> setInformativeText: ]
@ -225,8 +224,7 @@ M: cocoa-ui-backend system-alert
[ "OK" <NSString> -> addButtonWithTitle: drop ] [ "OK" <NSString> -> addButtonWithTitle: drop ]
[ -> runModal drop ] [ -> runModal drop ]
} cleave } cleave
] [ 2drop ] if* ] [ 2drop ] if* ;
init-thread-timer ;
CLASS: FactorApplicationDelegate < NSObject CLASS: FactorApplicationDelegate < NSObject
[ [