--- a/Image.st Wed Sep 07 06:48:09 2016 +0200
+++ b/Image.st Thu Sep 08 06:46:34 2016 +0200
@@ -12598,7 +12598,7 @@
copyFrom:anImage x:srcX y:srcY toX:dstX y:dstY width:w height:h
"replace a rectangular area by pixels from another image.
- The sources colors must be present in the destinations
+ The source's colors must be present in the destination's
colorMap - otherwise, an error will be reported.
Any mask is copied from the source.
@@ -12658,9 +12658,9 @@
"
|i1 i8 i4|
- i8 := Image fromFile:'goodies/bitmaps/gifImages/garfield.gif'.
+ i8 := Image fromFile:'../../goodies/bitmaps/gifImages/garfield.gif'.
i8 inspect.
- i1 := Image fromFile:'libtool/bitmaps/SBrowser.xbm'.
+ i1 := Image fromFile:'../../libtool/bitmaps/SBrowser.xbm'.
i1 inspect.
i4 := Depth4Image fromImage:i8.
@@ -12764,6 +12764,13 @@
i inspect.
(i subImageIn:(300@160 corner:340@200)) inspect
"
+ "
+ |i|
+
+ i := Image fromFile:'/Volumes/tmp/fillimage.ok.png'.
+ i inspect.
+ (i subImageIn:(0@0 corner:i width@i height)) inspect
+ "
"Created: 20.9.1995 / 01:24:20 / claus"
! !