#REFACTORING by cg
authorClaus Gittinger <cg@exept.de>
Fri, 22 Mar 2019 13:45:30 +0100
changeset 23951 1cbf730208f8
parent 23950 308a94fcf0cd
child 23952 59e081dd12dc
#REFACTORING by cg class: ObjectCoder class comment/format in: #encode: #encode:with: changed: #encode:on: #encode:on:with:
ObjectCoder.st
--- a/ObjectCoder.st	Fri Mar 22 13:31:52 2019 +0100
+++ b/ObjectCoder.st	Fri Mar 22 13:45:30 2019 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 2000 by eXept Software AG
               All Rights Reserved
@@ -98,7 +100,7 @@
 
 encode:anObject
     "encode anObject.
-     Some subclasses (eg. XMLCoder)allow arbitrary objects to be encoded/decoded,
+     Some subclasses (eg. XMLCoder) allow arbitrary objects to be encoded/decoded,
      others don't (eg. Base64Coder)"
 
     ^ self new encodingOf:anObject with:nil
@@ -110,36 +112,40 @@
     "
 
     "Modified (comment): / 06-02-2017 / 09:24:40 / cg"
+    "Modified (comment): / 21-03-2019 / 21:57:50 / Claus Gittinger"
 !
 
 encode:anObject on:aStream
     "encode anObject onto a stream
-     Some subclasses (eg. XMLCoder)allow arbitrary objects to be encoded/decoded,
+     Some subclasses (eg. XMLCoder) allow arbitrary objects to be encoded/decoded,
      others don't (eg. Base64Coder)"
 
-    self encode:anObject on:aStream with:nil
+    ^ self new encode:anObject on:aStream with:nil
 
     "Modified (format): / 06-02-2017 / 09:25:31 / cg"
+    "Modified (comment): / 21-03-2019 / 21:57:47 / Claus Gittinger"
 !
 
 encode:anObject on:aStream with:info
     "encode anObject onto a stream
-     Some subclasses (eg. XMLCoder)allow arbitrary objects to be encoded/decoded,
+     Some subclasses (eg. XMLCoder) allow arbitrary objects to be encoded/decoded,
      others don't (eg. Base64Coder)"
 
-    self new encode:anObject on:aStream with:info
+    ^ self new encode:anObject on:aStream with:info
 
     "Modified (format): / 06-02-2017 / 09:25:27 / cg"
+    "Modified (comment): / 21-03-2019 / 21:57:44 / Claus Gittinger"
 !
 
 encode:anObject with:aParameter
     "encode anObject onto a stream
-     Some subclasses (eg. XMLCoder)allow arbitrary objects to be encoded/decoded,
+     Some subclasses (eg. XMLCoder) allow arbitrary objects to be encoded/decoded,
      others don't (eg. Base64Coder)"
 
     ^ self new encodingOf:anObject with:aParameter
 
     "Modified (format): / 06-02-2017 / 09:25:20 / cg"
+    "Modified (comment): / 21-03-2019 / 21:57:41 / Claus Gittinger"
 !
 
 encodingOf:anObject