Changeset 6155


Ignore:
Timestamp:
Apr 7, 2007, 12:45:32 PM (13 years ago)
Author:
gb
Message:

Use ns:with-... instead of rlet/ns:init.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/objc-gf/ccl/examples/cocoa-window.lisp

    r6130 r6155  
    326326                         (auto-display t)
    327327                         (activate t))
    328   (rlet ((frame :ns-rect))
    329     (ns:init-ns-rect frame x y width height)
     328  (ns:with-ns-rect (frame x y width height)
    330329    (let* ((stylemask
    331330            (logior #$NSTitledWindowMask
Note: See TracChangeset for help on using the changeset viewer.