--- a/HashStream.st	Sun Jan 22 11:08:54 2012 +0100
+++ b/HashStream.st	Mon Jan 23 10:01:40 2012 +0100
@@ -297,9 +297,22 @@
 !
 
 hashValue
-    "retunr the value of the computeted hash"
+    "return the value of the computed hash"
 
     ^ self subclassResponsibility
+
+    "Modified (comment): / 23-01-2012 / 10:01:20 / cg"
+!
+
+hashValueOf:aString
+    "for convenience:
+     return the value of the computed hash of aString"
+
+    self reset.
+    self nextPutAll:aString.
+    ^ self hashValue
+
+    "Created: / 18-01-2012 / 17:26:25 / cg"
 !
 
 isReadable
@@ -388,9 +401,9 @@
 !HashStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/HashStream.st,v 1.24 2012-01-12 11:25:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/HashStream.st,v 1.25 2012-01-23 09:01:40 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/HashStream.st,v 1.24 2012-01-12 11:25:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/HashStream.st,v 1.25 2012-01-23 09:01:40 cg Exp $'
 ! !