--- a/FontDescription.st	Mon Mar 17 10:33:05 2014 +0100
+++ b/FontDescription.st	Mon Mar 17 10:33:20 2014 +0100
@@ -1325,7 +1325,7 @@
         nm := nm , '-', style.
     ].
     size notNil ifTrue:[
-        nm := nm , '-', size printString.
+        nm := nm , '-', size printString,'pt'.
     ] ifFalse:[
         pixelSize notNil ifTrue:[
             nm := nm , '-', pixelSize printString,'px'.
@@ -1697,11 +1697,11 @@
 !FontDescription class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/FontDescription.st,v 1.90 2014-03-17 09:33:05 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/FontDescription.st,v 1.91 2014-03-17 09:33:20 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview/FontDescription.st,v 1.90 2014-03-17 09:33:05 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/FontDescription.st,v 1.91 2014-03-17 09:33:20 cg Exp $'
 ! !