--- a/WinIconRdr.st Mon Feb 06 01:37:58 1995 +0100
+++ b/WinIconRdr.st Mon Feb 06 01:39:52 1995 +0100
@@ -21,7 +21,7 @@
COPYRIGHT (c) 1993 by Claus Gittinger
All Rights Reserved
-$Header: /cvs/stx/stx/libview2/Attic/WinIconRdr.st,v 1.9 1994-11-17 14:30:22 claus Exp $
+$Header: /cvs/stx/stx/libview2/Attic/WinIconRdr.st,v 1.10 1995-02-06 00:39:48 claus Exp $
'!
!WindowsIconReader class methodsFor:'documentation'!
@@ -42,7 +42,7 @@
version
"
-$Header: /cvs/stx/stx/libview2/Attic/WinIconRdr.st,v 1.9 1994-11-17 14:30:22 claus Exp $
+$Header: /cvs/stx/stx/libview2/Attic/WinIconRdr.st,v 1.10 1995-02-06 00:39:48 claus Exp $
"
!
@@ -160,7 +160,8 @@
photometric := #palette.
samplesPerPixel := 1.
bitsPerSample := #(8).
- colorMap := Array with:rMap with:gMap with:bMap.
+"/ colorMap := Array with:rMap with:gMap with:bMap.
+ colorMap := Colormap redVector:rMap greenVector:gMap blueVector:bMap.
inStream close.
"
@@ -308,7 +309,8 @@
photometric := #palette.
samplesPerPixel := 1.
bitsPerSample := #(8).
- colorMap := Array with:rMap with:gMap with:bMap.
+"/ colorMap := Array with:rMap with:gMap with:bMap.
+ colorMap := Colormap redVector:rMap greenVector:gMap blueVector:bMap.
inStream close.
!
@@ -446,7 +448,8 @@
photometric := #palette.
samplesPerPixel := 1.
bitsPerSample := #(8).
- colorMap := Array with:rMap with:gMap with:bMap.
+"/ colorMap := Array with:rMap with:gMap with:bMap.
+ colorMap := Colormap redVector:rMap greenVector:gMap blueVector:bMap.
inStream close.
"
--- a/WindowsIconReader.st Mon Feb 06 01:37:58 1995 +0100
+++ b/WindowsIconReader.st Mon Feb 06 01:39:52 1995 +0100
@@ -21,7 +21,7 @@
COPYRIGHT (c) 1993 by Claus Gittinger
All Rights Reserved
-$Header: /cvs/stx/stx/libview2/WindowsIconReader.st,v 1.9 1994-11-17 14:30:22 claus Exp $
+$Header: /cvs/stx/stx/libview2/WindowsIconReader.st,v 1.10 1995-02-06 00:39:48 claus Exp $
'!
!WindowsIconReader class methodsFor:'documentation'!
@@ -42,7 +42,7 @@
version
"
-$Header: /cvs/stx/stx/libview2/WindowsIconReader.st,v 1.9 1994-11-17 14:30:22 claus Exp $
+$Header: /cvs/stx/stx/libview2/WindowsIconReader.st,v 1.10 1995-02-06 00:39:48 claus Exp $
"
!
@@ -160,7 +160,8 @@
photometric := #palette.
samplesPerPixel := 1.
bitsPerSample := #(8).
- colorMap := Array with:rMap with:gMap with:bMap.
+"/ colorMap := Array with:rMap with:gMap with:bMap.
+ colorMap := Colormap redVector:rMap greenVector:gMap blueVector:bMap.
inStream close.
"
@@ -308,7 +309,8 @@
photometric := #palette.
samplesPerPixel := 1.
bitsPerSample := #(8).
- colorMap := Array with:rMap with:gMap with:bMap.
+"/ colorMap := Array with:rMap with:gMap with:bMap.
+ colorMap := Colormap redVector:rMap greenVector:gMap blueVector:bMap.
inStream close.
!
@@ -446,7 +448,8 @@
photometric := #palette.
samplesPerPixel := 1.
bitsPerSample := #(8).
- colorMap := Array with:rMap with:gMap with:bMap.
+"/ colorMap := Array with:rMap with:gMap with:bMap.
+ colorMap := Colormap redVector:rMap greenVector:gMap blueVector:bMap.
inStream close.
"
--- a/XPMReader.st Mon Feb 06 01:37:58 1995 +0100
+++ b/XPMReader.st Mon Feb 06 01:39:52 1995 +0100
@@ -21,7 +21,7 @@
COPYRIGHT (c) 1994 by Claus Gittinger
All Rights Reserved
-$Header: /cvs/stx/stx/libview2/XPMReader.st,v 1.4 1994-11-17 14:30:07 claus Exp $
+$Header: /cvs/stx/stx/libview2/XPMReader.st,v 1.5 1995-02-06 00:39:52 claus Exp $
'!
!XPMReader class methodsFor:'documentation'!
@@ -42,7 +42,7 @@
version
"
-$Header: /cvs/stx/stx/libview2/XPMReader.st,v 1.4 1994-11-17 14:30:07 claus Exp $
+$Header: /cvs/stx/stx/libview2/XPMReader.st,v 1.5 1995-02-06 00:39:52 claus Exp $
"
!
@@ -171,7 +171,8 @@
redMap := Array new:colorMapSize.
greenMap := Array new:colorMapSize.
blueMap := Array new:colorMapSize.
- colorMap := Array with:redMap with:greenMap with:blueMap.
+"/ colorMap := Array with:redMap with:greenMap with:blueMap.
+ colorMap := Colormap redVector:redMap greenVector:greenMap blueVector:blueMap.
1 to:colorMapSize do:[:colorIndex |
|index line color|