--- a/SHA1Stream.st	Mon Aug 12 00:25:34 2013 +0200
+++ b/SHA1Stream.st	Mon Aug 12 00:25:41 2013 +0200
@@ -426,9 +426,9 @@
 
 !SHA1Stream class methodsFor:'queries'!
 
-blockSize
+hashBlockSize
     "return the block size used internally by the compression function"
-
+    
     ^ 64
 
     "Created: / 18.3.1999 / 08:37:10 / stefan"
@@ -582,11 +582,11 @@
 !SHA1Stream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/SHA1Stream.st,v 1.38 2013-04-03 10:32:28 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/SHA1Stream.st,v 1.39 2013-08-11 22:25:41 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/SHA1Stream.st,v 1.38 2013-04-03 10:32:28 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/SHA1Stream.st,v 1.39 2013-08-11 22:25:41 stefan Exp $'
 ! !