#BUGFIX expecco_2_8_0 expecco_2_8_0a expecco_2_8_0b
authorStefan Vogel <sv@exept.de>
Fri, 18 Dec 2015 08:04:37 +0100
changeset 7086 2c3d25b893b5
parent 7085 0ca75205df42
child 7087 faf0d73f0dcc
#BUGFIX class: XWorkstation added: #isX11Platform
XWorkstation.st
--- a/XWorkstation.st	Fri Dec 18 04:47:25 2015 +0000
+++ b/XWorkstation.st	Fri Dec 18 08:04:37 2015 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
 COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -728,6 +726,10 @@
 
 !XWorkstation class methodsFor:'queries'!
 
+isX11Platform
+    ^ true
+!
+
 platformName
     "ST-80 compatibility.
      Return a string describing the display systems platform.
@@ -7583,7 +7585,7 @@
 	    ).
 
       Screen current
-	heightOf:'hello World gggÖÜ' from:1 to:15
+	heightOf:'hello World gggÖÜ' from:1 to:15
 	inFont:(Screen current getDefaultFontWithEncoding:#'iso10646-1')
     "
 !