--- a/FontDescription.st	Fri Jun 20 12:02:37 1997 +0200
+++ b/FontDescription.st	Fri Jun 20 12:03:45 1997 +0200
@@ -262,6 +262,12 @@
     "Created: 25.1.1997 / 03:21:28 / cg"
 !
 
+encodings:aCollectionOfEncodings
+    "added for ST-80 compatibility; actually ignored currently"
+
+    "Created: 20.6.1997 / 09:52:46 / cg"
+!
+
 fixedWidth:aBoolean
     "added for ST-80 compatibility; actually ignored currently"
 
@@ -288,6 +294,19 @@
     "Modified: 25.1.1997 / 03:20:55 / cg"
 !
 
+outline:aBoolean
+    "added for ST-80 compatibility; actually ignored currently"
+
+    flags isNil ifTrue:[
+        flags := masks := 0
+    ].
+    flags := flags bitOr:OutlineFlag.
+    masks := masks bitOr:OutlineFlag
+
+    "Modified: 25.1.1997 / 03:20:55 / cg"
+    "Created: 20.6.1997 / 09:50:06 / cg"
+!
+
 pixelSize:aNumber
     "added for ST-80 compatibility; actually ignored currently"
 
@@ -308,6 +327,45 @@
 
     "Created: 25.1.1997 / 03:15:17 / cg"
     "Modified: 25.1.1997 / 03:20:59 / cg"
+!
+
+shadow:aBoolean
+    "added for ST-80 compatibility; actually ignored currently"
+
+    flags isNil ifTrue:[
+        flags := masks := 0
+    ].
+    flags := flags bitOr:ShadowFlag.
+    masks := masks bitOr:ShadowFlag
+
+    "Modified: 25.1.1997 / 03:20:55 / cg"
+    "Created: 20.6.1997 / 09:51:03 / cg"
+!
+
+strikeout:aBoolean
+    "added for ST-80 compatibility; actually ignored currently"
+
+    flags isNil ifTrue:[
+        flags := masks := 0
+    ].
+    flags := flags bitOr:StrikeoutFlag.
+    masks := masks bitOr:StrikeoutFlag
+
+    "Modified: 25.1.1997 / 03:20:55 / cg"
+    "Created: 20.6.1997 / 09:51:36 / cg"
+!
+
+underline:aBoolean
+    "added for ST-80 compatibility; actually ignored currently"
+
+    flags isNil ifTrue:[
+        flags := masks := 0
+    ].
+    flags := flags bitOr:UnderlineFlag.
+    masks := masks bitOr:UnderlineFlag
+
+    "Modified: 25.1.1997 / 03:20:55 / cg"
+    "Created: 20.6.1997 / 09:51:18 / cg"
 ! !
 
 !FontDescription methodsFor:'accessing'!
@@ -662,6 +720,6 @@
 !FontDescription class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/FontDescription.st,v 1.22 1997-06-04 11:16:58 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/FontDescription.st,v 1.23 1997-06-20 10:03:45 cg Exp $'
 ! !
 FontDescription initialize!