--- a/EditTextView.st Fri Aug 30 00:22:34 2013 +0100
+++ b/EditTextView.st Fri Aug 30 18:02:56 2013 +0100
@@ -4604,6 +4604,7 @@
oldTypeOfSelection == #paste ifTrue:[
cursorLine := selectionEndLine.
cursorCol := selectionEndCol + 1.
+ ].
self unselect; makeCursorVisible.
self cursorRight.
].