Icon.st
changeset 3450 99f1dee7668e
parent 3341 b37e37384f3e
child 3548 0053d65044b9
--- 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 $'
 ! !