--- a/EditTextView.st	Tue Apr 17 21:04:34 2012 +0200
+++ b/EditTextView.st	Tue Apr 17 21:44:12 2012 +0200
@@ -4373,7 +4373,7 @@
     "On X11, be nice and paste PRIMARY when middle click. 
      Note, that middle button on X11 is translated to button
      128 in Smalltalk/X - see XWorkstation class>>initializeConstants"
-    (button == 128 and:[device platformName == #X11]) ifTrue:[
+    (button == #paste and:[device platformName == #X11]) ifTrue:[
         self undoableDo:[
             self paste: (self getClipboardText:#selection).
         ].
@@ -8055,9 +8055,9 @@
 !EditTextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.527 2012-04-17 19:04:34 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.528 2012-04-17 19:44:12 vrany Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.527 2012-04-17 19:04:34 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.528 2012-04-17 19:44:12 vrany Exp $'
 ! !