Class.st
changeset 22026 ec5d6fa4fb2c
parent 21981 e9d55847a18c
child 22035 e5f116a882a5
--- a/Class.st	Mon Jul 17 11:42:52 2017 +0200
+++ b/Class.st	Mon Jul 17 12:19:35 2017 +0200
@@ -495,7 +495,6 @@
 ! !
 
 
-
 !Class methodsFor:'Compatibility-Dolphin'!
 
 defaultCategoryForDolphinClasses
@@ -699,6 +698,10 @@
 
 !Class methodsFor:'Compatibility-Squeak'!
 
+classComment:comment stamp:commentStamp
+    self comment:comment
+!
+
 commentStamp:stampString prior:priorVersion
     ^ SqueakCommentReader new
         class:self stamp:stampString priorVersion:priorVersion
@@ -1983,6 +1986,7 @@
     "Created: / 18-07-2011 / 09:14:38 / cg"
 ! !
 
+
 !Class methodsFor:'adding & removing'!
 
 removeFromSystem