Changeset 14895


Ignore:
Timestamp:
Jul 20, 2011, 10:41:51 PM (8 years ago)
Author:
gb
Message:

revert last change

File:
1 edited

Legend:

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

    r14894 r14895  
    7373
    7474(objc:defmethod (#/dealloc :void) ((self sequence-window-controller))
    75   (let* ((table-view (slot-value self 'table-view))
    76          (title (slot-value self 'title)))
    77     (unless (%null-ptr-p table-view)
    78       (setf (slot-value self 'table-view) (%null-ptr))
    79       (#/release table-view))
    80     (unless (%null-ptr-p title)
    81       (setf (slot-value self 'title) (%null-ptr))
    82       (#/release title))
    83     (objc:remove-lisp-slots self)
    84     (call-next-method)))
     75  (call-next-method))
    8576
    8677(objc:defmethod (#/windowWillClose: :void) ((self sequence-window-controller)
Note: See TracChangeset for help on using the changeset viewer.