--- a/FontDescription.st	Thu Feb 04 10:34:17 1999 +0100
+++ b/FontDescription.st	Thu Feb 04 16:37:46 1999 +0100
@@ -503,21 +503,18 @@
 !
 
 fromLiteralArrayEncoding:encoding
-    "read my contents from a aLiteralEncodedArray"
-
-    |items groups values|
+    "read my contents from a aLiteralEncodedArray.
+     Must match to what is generated in #literalArrayEncoding"
 
     family := encoding at:2.
     face   := encoding at:3.
     style  := encoding at:4.
     size   := encoding at:5.
-
-
-
 !
 
 literalArrayEncoding
-    "return myself encoded as a literal array"
+    "return myself encoded as a literal array.
+     Must match to what is expected in #fromLiteralArrayEncoding:"
 
     ^ Array
         with:self class name asSymbol
@@ -525,7 +522,6 @@
         with:face
         with:style
         with:size
-
 !
 
 on:aDevice
@@ -729,6 +725,6 @@
 !FontDescription class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/FontDescription.st,v 1.25 1998-06-20 15:04:25 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/FontDescription.st,v 1.26 1999-02-04 15:37:46 cg Exp $'
 ! !
 FontDescription initialize!