[racket] Disable dragging on Pasteboard%

On Sun, 15 Feb 2015 21:56:13 +0300
Dmitry Pavlov <dpavlov at ipa.nw.ru> wrote:

> Richard,
> 
> > I'm trying to disable dragging on the Pasteboard. However using
> > set-dragable to #f also prevents the snip from being selected.
> >
> > Any ideas on how I would keep a snip selectable but not dragable?
> 
> Maybe the following will help:
> 
> (define my-pasteboard%
>    (class pasteboard%
>      (super-new)
>      (define/augment (can-interactive-move? snip)
>        #f)
>      (define/augment (can-interactive-resize? snip)
>        #f)
>     ))
> 
> 
> Regards,
> 
> Dmitry

Thanks Dmitry that is exactly what I was looking for.