Changeset 12366


Ignore:
Timestamp:
Jul 6, 2009, 6:19:52 PM (10 years ago)
Author:
rme
Message:

Return type of #/performDragOperation: is #>BOOL. Also return #$YES
when we accept the dragged-in filenames to avoid the slide-back animation.

File:
1 edited

Legend:

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

    r12364 r12366  
    881881(declaim (special hemlock-textstorage-text-view))
    882882
    883 (objc:defmethod (#/performDragOperation: :boolean)
     883(objc:defmethod (#/performDragOperation: #>BOOL)
    884884    ((self hemlock-textstorage-text-view)
    885885     (sender :id))
     
    916916                        (buf (hi:hemlock-view-buffer hview))
    917917                        (point (hi::buffer-point buf)))
    918                    (hi::insert-string point dropstr)))))
     918                   (hi::insert-string point dropstr)
     919                   #$YES))))
    919920            ;; we found NSFilenamesPboardType, but didn't get an array of pathnames; huh???
    920921            (t (log-debug "hemlock-textstorage-text-view received an unrecognized data type in a drag operation: '~S'"
Note: See TracChangeset for help on using the changeset viewer.