Changeset 11560 for release/1.2


Ignore:
Timestamp:
Dec 29, 2008, 9:54:30 PM (11 years ago)
Author:
gb
Message:

Propagate r11215 to 1.2.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • release/1.2/source/cocoa-ide/inspector.lisp

    r8494 r11560  
    8484  (with-slots (table-view back-button forward-button refresh-button item-menu) self
    8585    (#/setTarget: back-button self)
    86     (#/setAction: back-button (@selector #/goBack))
     86    (#/setAction: back-button (@selector #/goBack:))
    8787    (#/setTarget: forward-button self)
    88     (#/setAction: forward-button (@selector #/goForward))
     88    (#/setAction: forward-button (@selector #/goForward:))
    8989    (#/setTarget: refresh-button self)
    90     (#/setAction: refresh-button (@selector #/doRefresh))
     90    (#/setAction: refresh-button (@selector #/doRefresh:))
    9191    (#/setTarget: table-view self)
    9292    (#/setDoubleAction: table-view (@selector #/inspectSelectionInPlace:))
     
    115115          (if (and (< next-index (fill-pointer viewed-inspector-items))
    116116                   (eq ii (aref viewed-inspector-items next-index)))
    117             ;;If the ii is the same and the next history item, then just go forward in history
     117            ;;If the ii is the same as the next history item, then just go forward in history
    118118            (set-current-inspector-item wc next-index)
    119119            ;;Otherwise forget the forward history
     
    135135  (declare (ignore sender)))
    136136
    137 (objc:defmethod (#/goBack :void) ((wc ninspector-window-controller) sender)
     137(objc:defmethod (#/goBack: :void) ((wc ninspector-window-controller) sender)
    138138  (declare (ignore sender))
    139139  (set-current-inspector-item wc (- (next-index wc) 2)))
    140140
    141 (objc:defmethod (#/goForward :void) ((wc ninspector-window-controller) sender)
     141(objc:defmethod (#/goForward: :void) ((wc ninspector-window-controller) sender)
    142142  (declare (ignore sender))
    143143  (set-current-inspector-item wc (next-index wc)))
    144144
    145 (objc:defmethod (#/doRefresh :void) ((wc ninspector-window-controller) sender)
     145(objc:defmethod (#/doRefresh: :void) ((wc ninspector-window-controller) sender)
    146146  (declare (ignore sender))
    147147  (push-inspector-item wc (make-inspector-item (inspector-object (inspector-item wc)))))
Note: See TracChangeset for help on using the changeset viewer.