ImageEditView.st
changeset 796 b68b09ddc62b
parent 783 c81a097b84b8
child 822 cace81f0a86b
--- a/ImageEditView.st	Thu Feb 26 20:50:40 1998 +0100
+++ b/ImageEditView.st	Thu Feb 26 23:26:11 1998 +0100
@@ -441,8 +441,9 @@
     image atImageAndMask: imagePoint put: self selectedColor.
     image restored.
     self redraw: (imageBox := (imagePoint * magnification extent: magnification) expandedBy: 1).
-    masterApplication imagePreView redraw: ((imagePoint + 1) extent: 1@1).
-    modified := true
+    masterApplication imagePreView redraw: ((imagePoint - 1) extent: 3@3).
+    modified := true.
+
 !
 
 resizeImage
@@ -665,8 +666,12 @@
         ifTrue:
         [
             undoImage := image.
-            undoImage notNil ifTrue: [masterApplication valueOfCanUndo value: true].
-            masterApplication imagePreView image: anImage.
+            masterApplication notNil 
+            ifTrue: 
+            [
+                undoImage notNil ifTrue: [masterApplication valueOfCanUndo value: true].
+                masterApplication imagePreView image: anImage
+            ].
             super image: anImage.
             ^self
         ].
@@ -1003,5 +1008,5 @@
 !ImageEditView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/ImageEditView.st,v 1.69 1998-02-24 18:42:22 tz Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/ImageEditView.st,v 1.70 1998-02-26 22:26:11 tz Exp $'
 ! !