--- a/FileBrowser.st	Sun Sep 23 01:41:49 2018 +0200
+++ b/FileBrowser.st	Sun Sep 23 03:48:30 2018 +0200
@@ -6698,7 +6698,7 @@
 
     info isRegular ifTrue:[
         md5Hash := MD5Stream hashValueOfFile:f.
-        s := String streamContents:[:s | md5Hash do:[:byte | s nextPutAll:(byte hexPrintString)]].
+        s := md5Hash hexPrintString.
         text add:(resources string:'md5:   %1' with:s).
     ].
 
@@ -6729,9 +6729,10 @@
     ].
     ^ text asString
 
-    "Modified: / 8.9.1995 / 11:59:28 / claus"
-    "Modified: / 18.9.1997 / 16:34:31 / stefan"
-    "Modified: / 16.11.2001 / 00:45:11 / cg"
+    "Modified: / 08-09-1995 / 11:59:28 / claus"
+    "Modified: / 18-09-1997 / 16:34:31 / stefan"
+    "Modified: / 16-11-2001 / 00:45:11 / cg"
+    "Modified: / 23-09-2018 / 03:47:09 / Claus Gittinger"
 !
 
 getInfoFile