XWorkstation.st
branchjv
changeset 8270 a8343a9d983f
parent 8188 00df122d8bd4
child 8420 76e39223f5ab
equal deleted inserted replaced
8269:5382a417a503 8270:a8343a9d983f
  1859     "XQuartz seems to have a bug here...
  1859     "XQuartz seems to have a bug here...
  1860      ...but only on XQuartz servers.
  1860      ...but only on XQuartz servers.
  1861      Blame: I cannot ask via server vendor, if its a Quartz display, because
  1861      Blame: I cannot ask via server vendor, if its a Quartz display, because
  1862      it does not return a valid server vendor string"
  1862      it does not return a valid server vendor string"
  1863     OperatingSystem isOSXlike ifTrue:[
  1863     OperatingSystem isOSXlike ifTrue:[
  1864 	^ false
  1864         ^ false
  1865     ].
  1865     ].
       
  1866 
       
  1867     "
       
  1868     XWayland also does not support XGetImage() and the XWayland's vendor string
       
  1869     is just 'The X.Org Foundation', sigh.
       
  1870 
       
  1871     See https://swing.fit.cvut.cz/projects/stx-jv/ticket/190
       
  1872     "
       
  1873     ((OperatingSystem getEnvironment:'WAYLAND_DISPLAY') notNil 
       
  1874         or:[  (OperatingSystem getEnvironment:'XDG_SESSION_TYPE') = 'wayland']) ifTrue:[ ^ false].
       
  1875 
  1866     ^ true
  1876     ^ true
  1867 
  1877 
  1868     "
  1878     "
  1869      Display serverVendor
  1879      Display serverVendor
  1870      Display supportsScreenReading
  1880      Display supportsScreenReading
  1871     "
  1881     "
       
  1882 
       
  1883     "Modified: / 04-01-2018 / 21:00:36 / Jan Vrany <jan.vrany@fit.cvut.cz>"
  1872 !
  1884 !
  1873 
  1885 
  1874 supportsUTF8WindowLabels
  1886 supportsUTF8WindowLabels
  1875     "answer true, if window labels are to be utf-8 encoded"
  1887     "answer true, if window labels are to be utf-8 encoded"
  1876 
  1888