Suggestion re: stk::motion-drag

From: Moises Lejter <>
Date: Fri, 10 Nov 1995 06:57:12 -0500 (EST)

In the code for Canvas.stk, in the STklos distribution, it says:

  (define (stk::motion-drag w x y)
    (move stk::instance-selected (- x stk::last-x) (- y stk::last-y))
    (set! stk::last-x x)
    (set! stk::last-y y)
    ;; Apply user :motion hook
    (apply (cadr stk::hooks) stk::instance-selected x y '()))

Would it not be more reasonable to provide the user :motion hook with
delta-x and delta-y, in addition to x and y? After all, the deltas
are likelier to be useful than the raw x,y values, no?

Received on Fri Nov 10 1995 - 13:00:54 CET

This archive was generated by hypermail 2.3.0 : Mon Jul 21 2014 - 19:38:59 CEST