--- a/TextView.st	Tue Nov 08 17:49:18 2005 +0100
+++ b/TextView.st	Tue Nov 22 13:44:19 2005 +0100
@@ -688,6 +688,10 @@
     ^ contentsWasSaved
 !
 
+contentsWasSaved:aBoolean
+    contentsWasSaved := aBoolean
+!
+
 defaultFileNameForFileDialog
     "return the default fileName to use for the save-box"
 
@@ -3845,7 +3849,7 @@
 !TextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.252 2005-10-19 12:39:18 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.253 2005-11-22 12:44:19 cg Exp $'
 ! !
 
 TextView initialize!