--- a/Icon.st Fri Mar 13 17:20:41 2015 +0100
+++ b/Icon.st Wed Mar 18 19:11:52 2015 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"
COPYRIGHT (c) 1995 by Claus Gittinger
All Rights Reserved
@@ -11,6 +13,8 @@
"
"{ Package: 'stx:libview2' }"
+"{ NameSpace: Smalltalk }"
+
Object subclass:#Icon
instanceVariableNames:'image mask'
classVariableNames:'KnownIcons'
@@ -45,7 +49,7 @@
Icon was mostly added for ST-80 Compatibility:
Images are returned via the #constantNamed: message which is used by
- some ST-80 PD classes and returns corresponding ST/X icons.
+ many ST-80 public domain classes and returns corresponding ST/X icons.
Notice, that ST/X does not provide Icon instances - Icon only consists
of class mimicri protocol, to make your life easier.
@@ -58,9 +62,6 @@
(PTF) CD. A copy of those bitmaps (from the PTF-CD) is found in
'goodies/bitmaps/st80bitmaps'.
- CAVEAT:
- masks are not yet implemented
-
[See also:]
Image Form ImageReader
@@ -589,11 +590,11 @@
!Icon class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/Icon.st,v 1.39 2014-05-23 08:27:37 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/Icon.st,v 1.40 2015-03-18 18:11:52 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libview2/Icon.st,v 1.39 2014-05-23 08:27:37 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/Icon.st,v 1.40 2015-03-18 18:11:52 cg Exp $'
! !