Monticello bug: "copy" to other repository from version inspector

Hi all,

I've just noticed the following bug, but I'm afraid I'm unsure how to
fix it:

 - save a MC version.
 - on the MCVersionInspector that appears, select "Copy".
 - choose and accept another repository.

I get the following walkback. When I use "Copy" from a *repository*
inspector, all works as expected.

Regards,
  Tony

 -=-=-=-=-

9 November 2020 1:11:22.590173 pm

VM: unix - Smalltalk
Image: Squeak6.0alpha [latest update: #20073]

SecurityManager state:
Restricted: false
FileAccess: true
SocketAccess: true
Working Dir /home/tonyg/src/squeak-gitweb
Trusted Dir /home/tonyg/src/squeak-gitweb/secure
Untrusted Dir /home/tonyg/src/squeak-gitweb/My Squeak

MCVersionInspector(Object)>>doesNotUnderstand: #repository
        Receiver: a MCVersionInspector
        Arguments and temporary variables:
                aMessage: repository
                exception: MessageNotUnderstood: MCVersionInspector>>repository
                resumeValue: nil
        Receiver's instance variables:
                dependents: a DependentsArray(a PluggableSystemWindow<Version:
Actors-tonyg.120...etc...
                morph: nil
                label: nil
                modalProcess: nil
                modalValue: nil
                version: a MCVersion(Actors-tonyg.120)

MCVersionInspector>>save
        Receiver: a MCVersionInspector
        Arguments and temporary variables:
                repository: a MCHttpRepository(https://www.squeaksource.com/Actors)
        Receiver's instance variables:
                dependents: a DependentsArray(a PluggableSystemWindow<Version:
Actors-tonyg.120...etc...
                morph: nil
                label: nil
                modalProcess: nil
                modalValue: nil
                version: a MCVersion(Actors-tonyg.120)

[... blah blah ...]

--- The full stack ---
MCVersionInspector(Object)>>doesNotUnderstand: #repository
MCVersionInspector>>save
PluggableButtonMorphPlus(PluggableButtonMorph)>>performAction
PluggableButtonMorphPlus>>performAction
[] in PluggableButtonMorphPlus(PluggableButtonMorph)>>mouseUp:
Array(SequenceableCollection)>>do:
PluggableButtonMorphPlus(PluggableButtonMorph)>>mouseUp:
PluggableButtonMorphPlus(Morph)>>handleMouseUp:
MouseButtonEvent>>sentTo:
PluggableButtonMorphPlus(Morph)>>handleEvent:
PluggableButtonMorphPlus(Morph)>>handleFocusEvent:
MorphicEventDispatcher>>doHandlingForFocusEvent:with:
MorphicEventDispatcher>>dispatchFocusEvent:with:
PluggableButtonMorphPlus(Morph)>>processFocusEvent:using:
PluggableButtonMorphPlus(Morph)>>processFocusEvent:
[] in [] in [] in HandMorph>>sendFocusEvent:to:clear:
[] in ActiveEventVariable class(DynamicVariable class)>>value:during:
FullBlockClosure(BlockClosure)>>ensure:
ActiveEventVariable class(DynamicVariable class)>>value:during:
 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[] in ActiveEventVariable class>>value:during:
FullBlockClosure(BlockClosure)>>ensure:
ActiveEventVariable class>>value:during:
MouseButtonEvent(MorphicEvent)>>becomeActiveDuring:
[] in [] in HandMorph>>sendFocusEvent:to:clear:
[] in ActiveHandVariable class(DynamicVariable class)>>value:during:
FullBlockClosure(BlockClosure)>>ensure:
ActiveHandVariable class(DynamicVariable class)>>value:during:
[] in ActiveHandVariable class>>value:during:
FullBlockClosure(BlockClosure)>>ensure:
ActiveHandVariable class>>value:during:
HandMorph>>becomeActiveDuring:
[] in HandMorph>>sendFocusEvent:to:clear:
[] in ActiveWorldVariable class(DynamicVariable class)>>value:during:
FullBlockClosure(BlockClosure)>>ensure:
ActiveWorldVariable class(DynamicVariable class)>>value:during:
[] in ActiveWorldVariable class>>value:during:
FullBlockClosure(BlockClosure)>>ensure:
ActiveWorldVariable class>>value:during:
PasteUpMorph>>becomeActiveDuring:
HandMorph>>sendFocusEvent:to:clear:
HandMorph>>sendEvent:focus:clear:
HandMorph>>sendMouseEvent:
HandMorph>>handleEvent:
HandMorph>>processEvents
[] in [] in WorldState>>doOneCycleNowFor:
[] in ActiveHandVariable class(DynamicVariable class)>>value:during:
FullBlockClosure(BlockClosure)>>ensure:
ActiveHandVariable class(DynamicVariable class)>>value:during:
[] in ActiveHandVariable class>>value:during:
FullBlockClosure(BlockClosure)>>ensure:
ActiveHandVariable class>>value:during:
HandMorph>>becomeActiveDuring:
[] in WorldState>>doOneCycleNowFor:
Array(SequenceableCollection)>>do:
WorldState>>handsDo:
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
PasteUpMorph>>doOneCycle
[] in MorphicProject>>spawnNewProcess
[] in FullBlockClosure(BlockClosure)>>newProcess