--- a/PrintConverter.st	Mon Feb 10 19:29:26 1997 +0100
+++ b/PrintConverter.st	Tue Feb 11 11:54:23 1997 +0100
@@ -292,16 +292,31 @@
      which may be one of #number, #string, #symbol, #date or #password ..."
 
     aTypeSymbol == #number ifTrue:[
-	self initForNumber
+        self initForNumber
+    ].
+    aTypeSymbol == #numberOrNil ifTrue:[
+        self initForNumberOrNil
+    ].
+    aTypeSymbol == #integer ifTrue:[
+        self initForInteger
+    ].
+    aTypeSymbol == #integerOrNil ifTrue:[
+        self initForIntegerOrNil
     ].
     (aTypeSymbol == #string or:[aTypeSymbol == #password]) ifTrue:[
-	self initForString
+        self initForString
     ].
     aTypeSymbol == #date ifTrue:[
-	self initForDate
+        self initForDate
+    ].
+    aTypeSymbol == #float ifTrue:[
+        self initForFloat
+    ].
+    aTypeSymbol == #dateOrNil ifTrue:[
+        self initForDateOrNil
     ].
     aTypeSymbol == #symbol ifTrue:[
-	self initForSymbol
+        self initForSymbol
     ].
 
     type := aTypeSymbol
@@ -415,5 +430,5 @@
 !PrintConverter class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/PrintConverter.st,v 1.14 1996-05-18 15:37:13 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/PrintConverter.st,v 1.15 1997-02-11 10:54:23 ca Exp $'
 ! !