--- a/EditTextView.st	Tue Nov 06 01:40:59 2012 +0100
+++ b/EditTextView.st	Thu Nov 22 10:26:24 2012 +0100
@@ -5766,11 +5766,12 @@
     ].
 
     self isReadOnly ifTrue:[
-        m disableAll:#(undo again multipleAgain redo
+        m disableAll:#(accept undo again multipleAgain redo
                        paste pasteOrReplace pasteOrReplaceFromHistory
                        cut indent autoIndent: insertMode:
                        insertFile insertFileAsStringLiteral insertURL
                        babelFishTranslate googleSpellingSuggestion sort
+                       convertSelectionToLowercaseOrUppercaseOrUppercaseFirst 
                        joinLines insertUUID insertDateAndTime pasteAsStringLiteral
                        specialCharacters)
     ].
@@ -8021,9 +8022,9 @@
 !EditTextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.534 2012-10-23 12:59:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.535 2012-11-22 09:26:24 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.534 2012-10-23 12:59:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.535 2012-11-22 09:26:24 stefan Exp $'
 ! !