diff -r 43af86dd75ca -r 446521a66e42 Base32Coder.st --- a/Base32Coder.st Tue Mar 22 17:02:28 2016 +0100 +++ b/Base32Coder.st Tue Mar 22 18:31:14 2016 +0100 @@ -1,5 +1,3 @@ -"{ Encoding: utf8 }" - " COPYRIGHT (c) 2002 by eXept Software AG All Rights Reserved @@ -145,7 +143,7 @@ !Base32Coder methodsFor:'encoding'! -nextPut:aByte +nextPutByte:aByte "encode aByte on the output stream" "RFC 2045 says: max 76 characters in one line" @@ -154,7 +152,7 @@ charCount := 0. ]. - buffer := (buffer bitShift:8) bitOr:aByte asInteger. + buffer := (buffer bitShift:8) bitOr:aByte. bits := bits + 8 - 5. "max value of bits = 4 + 8 - 5" bits >= 5 ifTrue:[ @@ -249,10 +247,10 @@ !Base32Coder class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libbasic2/Base32Coder.st,v 1.4 2015-05-07 20:36:29 cg Exp $' + ^ '$Header$' ! version_CVS - ^ '$Header: /cvs/stx/stx/libbasic2/Base32Coder.st,v 1.4 2015-05-07 20:36:29 cg Exp $' + ^ '$Header$' ! !