Fix PDFKit demo

slava 2006-02-10 03:35:28 +00:00
parent dc3f4b2efb
commit ecf9010f6d
2 changed files with 1 additions and 2 deletions

View File

@ -6,7 +6,7 @@ objc-NSObject objc-NSWindow objc-PDFDocument objc-PDFView ;
: <PDFDocument> ( url -- document )
<CFURL> [autorelease]
PDFDocument swap [initWithURL:] [autorelease] ;
PDFDocument [alloc] swap [initWithURL:] [autorelease] ;
: <PDFView> ( document -- view )
PDFView [alloc] 0 0 500 500 <NSRect> [initWithFrame:]

View File

@ -25,7 +25,6 @@ objc-NSAutoreleasePool objc-NSObject threads ;
: event-loop ( -- )
\ NSApplication get expired? [
drop
NSApplication [sharedApplication]
\ NSApplication set-global
[ (event-loop) ] in-thread