Changeset 704


Ignore:
Timestamp:
Mar 22, 2004, 9:38:50 AM (21 years ago)
Author:
Gary Byers
Message:

UI object will be *NSApp*.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/ccl/examples/cocoa.lisp

    r630 r704  
    1111(fake-cfbundle-path "ccl:OpenMCL.app;Contents;MacOS;dppccl"))
    1212
    13 (defclass cocoa-ide-ui-object (ui-object)
    14     ())
    1513
    16 (setf (application-ui-object *application*) (make-instance 'cocoa-ide-ui-object))
     14
     15
    1716
    1817(require "OBJC-SUPPORT")
Note: See TracChangeset for help on using the changeset viewer.