--- a/StandardSystemView.st Fri May 18 00:38:45 2001 +0200
+++ b/StandardSystemView.st Fri May 18 00:40:34 2001 +0200
@@ -786,6 +786,8 @@
iconName:aString
"this method will vanish soon ... - for backward compatibility"
+ <resource:#obsolete>
+
self obsoleteMethodWarning:'use #iconLabel:'.
self iconLabel:aString
!
@@ -1487,6 +1489,6 @@
!StandardSystemView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/StandardSystemView.st,v 1.138 2001-04-02 08:59:54 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/StandardSystemView.st,v 1.139 2001-05-17 22:40:34 stefan Exp $'
! !
StandardSystemView initialize!