--- a/ObjectView.st Thu Aug 11 15:57:45 2005 +0200
+++ b/ObjectView.st Thu Aug 11 16:17:07 2005 +0200
@@ -1400,9 +1400,6 @@
"/ if the motion is more than mouseMotionDeltaForMove
"/ or the time-delta is longer than timeDeltaForMove
- buttonPressTime isNil ifTrue: [
- buttonPressTime := Time now.
- ].
(Timestamp now millisecondDeltaFrom:buttonPressTime) > self class mouseMotionTimeDeltaForMove ifFalse:[
inMotion == true ifTrue:[
minDeltaForMotion := 1
@@ -3378,5 +3375,5 @@
!ObjectView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/ObjectView.st,v 1.111 2005-08-11 13:57:45 ab Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/ObjectView.st,v 1.112 2005-08-11 14:17:07 ab Exp $'
! !