--- 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.
].