Mark obsolete methods
authorStefan Vogel <sv@exept.de>
Thu, 13 May 2004 20:52:52 +0200
changeset 8356 96c5195d52c7
parent 8355 b46ecc1b4d79
child 8357 64be78ef1e77
Mark obsolete methods
Class.st
ClassDescription.st
--- a/Class.st	Thu May 13 20:50:04 2004 +0200
+++ b/Class.st	Thu May 13 20:52:52 2004 +0200
@@ -3031,6 +3031,7 @@
 !Class methodsFor:'printOut'!
 
 htmlDocumentation
+    <resource: #obsolete>
     self obsoleteMethodWarning:'use HTMLDocGenerator htmlDocOf:'.
 
     ^ HTMLDocGenerator htmlDocOf:self
@@ -4705,5 +4706,5 @@
 !Class class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.471 2004-04-02 11:30:22 werner Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.472 2004-05-13 18:52:52 stefan Exp $'
 ! !
--- a/ClassDescription.st	Thu May 13 20:50:04 2004 +0200
+++ b/ClassDescription.st	Thu May 13 20:52:52 2004 +0200
@@ -551,6 +551,7 @@
     "evaluate aBlock for all classes in aCategory;
      no specific order is defined."
 
+    <resource: #obsolete>
     self obsoleteMethodWarning:'moved to Smalltalk'.
     Smalltalk allClassesInCategory:aCategory do:aBlock
 
@@ -567,6 +568,7 @@
     "evaluate aBlock for all classes in aCategory;
      superclasses come first - then subclasses."
 
+    <resource: #obsolete>
     self obsoleteMethodWarning:'moved to Smalltalk'.
     Smalltalk allClassesInCategory:aCategory inOrderDo:aBlock
 
@@ -3890,7 +3892,7 @@
 !ClassDescription class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ClassDescription.st,v 1.171 2004-04-08 10:54:03 werner Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ClassDescription.st,v 1.172 2004-05-13 18:52:17 stefan Exp $'
 ! !
 
 ClassDescription initialize!