--- a/XftFontDescription.st	Sun Mar 16 23:10:17 2014 +0100
+++ b/XftFontDescription.st	Mon Mar 17 09:08:52 2014 +0100
@@ -1640,6 +1640,8 @@
         "/ Transcript show:'->'; showCR:l. 
         (l startsWith:Character tab) ifFalse:[
             (l startsWith:'(') ifFalse:[self halt].
+            currentDescription minCode:minCode.
+            currentDescription maxCode:maxCode.
             ^ self.
         ].
 
@@ -1836,11 +1838,11 @@
 !XftFontDescription class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/XftFontDescription.st,v 1.33 2014-03-16 22:10:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/XftFontDescription.st,v 1.34 2014-03-17 08:08:52 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview/XftFontDescription.st,v 1.33 2014-03-16 22:10:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/XftFontDescription.st,v 1.34 2014-03-17 08:08:52 cg Exp $'
 ! !