--- 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 $'
! !