--- a/MethodChange.st	Thu Sep 24 12:12:28 2009 +0200
+++ b/MethodChange.st	Thu Sep 24 12:13:55 2009 +0200
@@ -223,15 +223,16 @@
     "append a user printed representation of the receiver to aStream.
      The format is suitable for a human - not meant to be read back."
 
-    aStream 
-        nextPutAll:(self className ? 'unnamed'); 
-        space; 
-        nextPutAll:(selector ? '?'); 
-        nextPutAll:' {'; 
-        nextPutAll:(methodCategory ? '?'); 
-        nextPutAll:'}'
+    aStream
+	nextPutAll:(self className ? 'unnamed');
+	nextPutAll:'>>';
+	nextPutAll:(selector ? '?');
+	nextPutAll:' {';
+	nextPutAll:(methodCategory ? '?');
+	nextPutAll:'}'
 
     "Modified: / 04-10-2006 / 16:46:01 / cg"
+    "Modified: / 07-11-2008 / 08:29:03 / Jan Vrany <vranyj1@fel.cvut.cz>"
 !
 
 printWithoutClassNameOn:aStream
@@ -296,5 +297,5 @@
 !MethodChange class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/MethodChange.st,v 1.50 2009-09-23 18:06:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/MethodChange.st,v 1.51 2009-09-24 10:13:55 cg Exp $'
 ! !