[Openmcl-cvs-notifications] r7832 - /trunk/ccl/cocoa-ide/cocoa-utils.lisp

[rme at clozure.com]

Author: rme
Date: Thu Dec  6 14:28:44 2007
New Revision: 7832

Log:
Set table view data source to nil before autoreleasing window controller
so that the table view doesn't get any ideas about redrawing itself as
things are getting torn down.

Modified:
    trunk/ccl/cocoa-ide/cocoa-utils.lisp

Modified: trunk/ccl/cocoa-ide/cocoa-utils.lisp
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D
--- trunk/ccl/cocoa-ide/cocoa-utils.lisp (original)
+++ trunk/ccl/cocoa-ide/cocoa-utils.lisp Thu Dec  6 14:28:44 2007
@@ -57,6 +57,7 @@
 (objc:defmethod (#/windowWillClose: :void) ((self sequence-window-controll=
er)
 					    notification)
   (declare (ignore notification))
+  (#/setDataSource: (slot-value self 'table-view) +null-ptr+)
   (#/autorelease self))
 =

 (objc:defmethod (#/sequenceDoubleClick: :void)