Mercurial Mercurial > hg > stx-libwidg / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
#REFACTORING by cg
authorClaus Gittinger <cg@exept.de>
Wed, 02 Nov 2016 16:22:46 +0100
changeset 5942 828121e0baf0
parent 5941 c38ea1820a2d
child 5943 050b4d258e8d
#REFACTORING by cg class: ObjectView changed: #pasteBuffer
ObjectView.st file | annotate | diff | comparison | revisions 
--- a/ObjectView.st	Wed Nov 02 14:49:15 2016 +0100
+++ b/ObjectView.st	Wed Nov 02 16:22:46 2016 +0100
@@ -675,7 +675,7 @@
     |sel|
 
     sel := self getClipboardObject.
-    ((Screen current platformName == #X11)
+    ((device isX11Platform)
      or:[(device getSelectionOwnerOf:#CLIPBOARD) == self drawableId])
     ifTrue:[
         "
hg/stx-libwidg