[cl-gtk2-devel] widget-event

[Kalyanov Dmitry]

Hello!

Sorry for the delayed response.

On Thu, 2010-08-19 at 08:56 +0000, hrapof at common-lisp.ru wrote:
> Hello!
> 
> I have an image with an eventbox and two rulers around it.
> I'm trying to make rulers' position markers follow mouse movements  
> above the image.
> The following idea was found on the web and worked for me with CLG.
> However, with such cl-gtk2 code
> 
> (within-main-loop
>      (let ((builder (make-instance 'builder)))
>        (builder-add-from-file builder "a.glade")
>        (builder-connect-signals-simple
>         builder
>         `(("eventbox1_motion_notify_event_cb"
> 	  ,(lambda (b event)
> 		   (declare (ignore b))
> 		   (widget-event (builder-get-object builder "vruler1") event)
> 		   (widget-event (builder-get-object builder "hruler1") event)
> 		   ))
> Why?


I'll try to debug it; from the stacktrace it seems that the widget-event
function tries to marshall the event structure as a C structure and
fails to copy one of its fields due to having a wrong value in it. I
think that the description of the event structure is wrong.

-------------- next part --------------
A non-text attachment was scrubbed...
Name: signature.asc
Type: application/pgp-signature
Size: 198 bytes
Desc: This is a digitally signed message part
URL: <https://mailman.common-lisp.net/pipermail/cl-gtk2-devel/attachments/20100829/85253d54/attachment.sig>