Changeset 14661


Ignore:
Timestamp:
Mar 1, 2011, 11:23:24 PM (9 years ago)
Author:
gb
Message:

In -windowShouldClose:?, find the document via
(#/document (#/windowController w)). NSWindows don't implement
#/document on Cocotron. (The do on Cocoa, but aren't ... um
... documented to.)

Fixes ticket:826.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/cocoa-ide/cocoa-listener.lisp

    r14537 r14661  
    305305(objc:defmethod (#/windowShouldClose: #>BOOL) ((w hemlock-listener-frame)
    306306                                               sender)
    307   (let* ((doc (#/document w)))
     307  (let* ((doc (#/document (#/windowController w))))
    308308    (if (or (%null-ptr-p doc)
    309309            (and (hemlock-document-process doc)
Note: See TracChangeset for help on using the changeset viewer.