Mercurial Mercurial > hg > stx-libview2 / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
checkin from browser
authorca
Tue, 11 Feb 1997 11:54:23 +0100
changeset 407 7dedb9b0f157
parent 406 16d990bcde6e
child 408 93582137e1c7
checkin from browser
PrintConv.st file | annotate | diff | comparison | revisions
PrintConverter.st file | annotate | diff | comparison | revisions 
--- a/PrintConv.st	Mon Feb 10 19:29:26 1997 +0100
+++ b/PrintConv.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/Attic/PrintConv.st,v 1.14 1996-05-18 15:37:13 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/Attic/PrintConv.st,v 1.15 1997-02-11 10:54:23 ca Exp $'
 ! !
--- 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 $'
 ! !
hg/stx-libview2