XftFontDescription.st
changeset 7673 8fcc7f754c03
parent 7615 316516094a19
child 7707 3205422f8332
child 7715 925b859e1758
--- a/XftFontDescription.st	Mon Nov 07 16:54:00 2016 +0100
+++ b/XftFontDescription.st	Wed Nov 09 10:17:25 2016 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "{ Package: 'stx:libview' }"
 
 "{ NameSpace: Smalltalk }"
@@ -741,9 +743,9 @@
         computedWeight := StXFace2FCWeightMap at:(face ? '') asLowercase ifAbsent:[FC_WEIGHT_REGULAR].
     ].
 
-
-    FirstTimeCalled ~~ false ifTrue:[
-        'XftFont: matching font (this may take a long time, if the system''s font cache needs to be filled first. Be patient...' infoPrintCR.
+    (OperatingSystem isMAClike and:[FirstTimeCalled ~~ false]) ifTrue:[
+        "Slow font matching is a MAC-only feature"
+        Logger info:'XFT: matching font (this may take a long time, if the system''s font cache needs to be filled first. Be patient...'.
         FirstTimeCalled := false.
     ].