diff -r c49679d75a5d -r 3b1a284174e7 Class.st --- a/Class.st Wed Jan 27 17:50:04 2016 +0100 +++ b/Class.st Wed Jan 27 19:16:51 2016 +0100 @@ -1,3 +1,5 @@ +"{ Encoding: utf8 }" + " COPYRIGHT (c) 1989 by Claus Gittinger All Rights Reserved @@ -145,7 +147,6 @@ " ! ! - !Class class methodsFor:'accessing-flags'! tryLocalSourceFirst @@ -495,6 +496,7 @@ "Modified: 23.4.1996 / 15:56:58 / cg" ! ! + !Class methodsFor:'Compatibility-Dolphin'! defaultCategoryForDolphinClasses @@ -1977,7 +1979,6 @@ "Created: / 18-07-2011 / 09:14:38 / cg" ! ! - !Class methodsFor:'adding & removing'! removeFromSystem @@ -5099,14 +5100,14 @@ "return my revision string; that one is extracted from the classes #version method. Either this is a method returning that string, or it's a comment-only method and the comment defines the version. - If the receiver is unloaded, or the source is not accessable, + If the receiver is unloaded, or the source is not accessible, or no such method exists, then nil is returned." ^ self revisionStringOfManager:nil " Smalltalk allClassesDo:[:cls | - Transcript show:cls name; show:' -> '; showCR:cls revisionString + Transcript show:cls name; show:' -> '; showCR:cls revisionString ]. Number revisionString