--- a/UserPreferences.st	Thu Apr 14 12:53:42 2016 +0200
+++ b/UserPreferences.st	Thu Apr 14 12:55:00 2016 +0200
@@ -1828,7 +1828,7 @@
     "change the flag which enables a workaround for a redraw bug when running X/Linux in the VMWare virtual machine"
 
     self at:#enableVMWareDrawingBugWorkaround put:aBoolean.
-    (Screen notNil and:[Screen current notNil and:[Screen current platformName = #X11]]) ifTrue:[
+    (Screen notNil and:[Screen current notNil and:[Screen current platformName == #X11]]) ifTrue:[
         Screen current maxOperationsUntilFlush:(aBoolean ifTrue:[1] ifFalse:[nil])
     ].