--- a/SelListV.st	Sat Feb 24 00:02:59 1996 +0100
+++ b/SelListV.st	Sat Feb 24 17:35:36 1996 +0100
@@ -22,7 +22,7 @@
 		SmallRightArrowShadowForm SmallRightArrowLightForm
 		DefaultForegroundColor DefaultBackgroundColor
 		DefaultHilightForegroundColor DefaultHilightBackgroundColor
-		DefaultHilightFrameColor DefaultHilightLevel DefaultFont
+		DefaultHilightFrameColor DefaultHilightLevel
 		DefaultRightArrowStyle DefaultRightArrowLevel
 		DefaultDisabledForegroundColor DefaultShadowColor
 		DefaultLightColor'
@@ -1674,9 +1674,7 @@
 
     super initStyle.
 
-    DefaultFont notNil ifTrue:[
-	font := DefaultFont on:device
-    ].
+"/    DefaultFont notNil ifTrue:[font := DefaultFont on:device].
 
     bgColor := viewBackground.
     hilightFrameColor := nil.
@@ -2626,5 +2624,5 @@
 !SelectionInListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Attic/SelListV.st,v 1.53 1996-02-23 16:20:03 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/SelListV.st,v 1.54 1996-02-24 16:35:14 cg Exp $'
 ! !