--- a/Filename.st	Thu Nov 08 13:29:07 2007 +0100
+++ b/Filename.st	Thu Nov 08 13:30:16 2007 +0100
@@ -5075,6 +5075,21 @@
     "Modified: / 15.10.1998 / 11:41:45 / cg"
 !
 
+contentsAsString
+    "to compensate for the bad naming, use this to make things explicit.
+     See also #contents, which returns the lines as stringCollection for textFiles."
+
+    ^ self contentsAsString
+
+    "
+     'Makefile' asFilename contentsOfEntireFile
+     'foobar' asFilename contentsOfEntireFile
+    "
+
+    "Modified: / 02-07-1996 / 12:49:45 / stefan"
+    "Created: / 08-11-2007 / 13:29:59 / cg"
+!
+
 contentsOfEntireFile
     "return the contents of the file as a string;
      Raises an error, if the file is unreadable/non-existing.
@@ -5517,7 +5532,7 @@
 !Filename class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.319 2007-11-08 12:29:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.320 2007-11-08 12:30:16 cg Exp $'
 ! !
 
 Filename initialize!