[squeak-dev] Dropping a morph gives me a funny menu
H. Hirzel
hannes.hirzel at gmail.com
Fri Mar 24 09:03:02 UTC 2017
Confirmed.
PasteUpMorph selectors select: [ :s | s asString includesSubstring: 'drop']
gives
#(#dropFiles: #dropEnabled)
So a place to start to find out what happens is
PasteUpMorph>>
dropFiles: anEvent
"Handle a number of dropped files from the OS.
TODO:
- use a more general mechanism for figuring out what to do with the
file (perhaps even offering a choice from a menu)
- remember the resource location or (when in browser) even the
actual file handle
"
| numFiles |
numFiles := anEvent contents.
1 to: numFiles do: [ :i |
(FileDirectory requestDropDirectory: i)
ifNotNil: [:directory | self handleDroppedItem: directory event: anEvent]
ifNil: [(FileStream requestDropStream: i) ifNotNil: [:stream |
[self handleDroppedItem: stream event: anEvent] ensure: [stream close]]]].
--Hannes
On 3/24/17, Chris Cunningham <cunningham.cb at gmail.com> wrote:
> In a fully up to date trunk image (windows/64bit, but I don't think that
> matters), if I drop a *.morph on the desktop, i get this funny dialog:
> [image: Inline image 1]
>
> The funny part is that it has 2 options for "load as morph". One should be
> sufficient.
>
> -cbc
>
More information about the Squeak-dev
mailing list
|