--- a/ImageEditView.st	Fri Nov 02 00:23:11 2007 +0100
+++ b/ImageEditView.st	Fri Nov 02 10:40:36 2007 +0100
@@ -378,7 +378,7 @@
         "/ currentPoint := currentPoint - self viewOrigin.
 
         self redraw: (((lastPastePoint ? currentPoint)"-self viewOrigin") extent: extent).
-        self repairDamage.
+        "/ self repairDamage.
 
 false "        (extent x > 400 or: [extent y > 400])" ifTrue:[
             self xoring: [
@@ -397,7 +397,7 @@
     ]. 
     lastPastePoint := currentPoint.
 
-    "Modified: / 18.5.1999 / 20:23:33 / cg"
+    "Modified: / 02-11-2007 / 00:43:00 / cg"
 !
 
 fillFramedRectangle: aRectangle
@@ -644,12 +644,14 @@
         self inPasteMode ifTrue: [
 "/ Transcript show:'p '; showCR:(self imageContainsPastePoint:p).
             ("self selectedColor notNil" true and: [self imageContainsPastePoint:p]) 
-                ifTrue:  [self drawPasteRectangleAt:p]
+                ifTrue:  [
+                    (self sensor hasButtonMotionEventFor:self) ifFalse:[
+                        self drawPasteRectangleAt:p]]
                 ifFalse: [self cursor:Cursor stop. self releasePasteDrawing]
         ]
     ]
 
-    "Modified: / 10.2.2000 / 22:03:18 / cg"
+    "Modified: / 02-11-2007 / 00:44:02 / cg"
 !
 
 buttonPress:button x:x y:y
@@ -1440,13 +1442,17 @@
     ] ifFalse:[
         (w//2) negated to:(w-(w//2)) do:[:xOffs |
             (w//2) negated to:(w-(w//2)) do:[:yOffs |
-                draw value:(imagePoint + (xOffs@yOffs)).
+                imagePoint x + xOffs >= 0 ifTrue:[
+                  imagePoint y + yOffs >= 0 ifTrue:[
+                    draw value:(imagePoint + (xOffs@yOffs)).
+                  ].
+                ].
             ].
         ].
     ].
     self setModified.
 
-    "Modified: / 02-11-2007 / 00:07:13 / cg"
+    "Modified: / 02-11-2007 / 00:34:25 / cg"
 !
 
 shiftImageHorizontal:shiftH vertical:shiftV
@@ -2405,7 +2411,7 @@
 !ImageEditView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/ImageEditView.st,v 1.220 2007-11-01 23:23:11 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/ImageEditView.st,v 1.221 2007-11-02 09:40:36 cg Exp $'
 ! !
 
 ImageEditView initialize!