--- a/MCLEntry.st	Fri Nov 24 14:35:33 1995 +0100
+++ b/MCLEntry.st	Fri Nov 24 21:54:55 1995 +0100
@@ -338,12 +338,14 @@
 	sub notNil ifTrue:[
 	    s := s , sub.
 	].
-	subStringIndex == strings size ifFalse:[
+	subStringIndex == nSub ifFalse:[
 	    s := s , tab
 	]
     ].
 
     ^ s
+
+    "Created: 24.11.1995 / 18:54:27 / cg"
 ! !
 
 !MultiColListEntry methodsFor:'defaults'!
@@ -441,5 +443,5 @@
 !MultiColListEntry class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/Attic/MCLEntry.st,v 1.11 1995-11-23 18:08:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/Attic/MCLEntry.st,v 1.12 1995-11-24 20:54:55 cg Exp $'
 ! !

--- a/MultiColListEntry.st	Fri Nov 24 14:35:33 1995 +0100
+++ b/MultiColListEntry.st	Fri Nov 24 21:54:55 1995 +0100
@@ -338,12 +338,14 @@
 	sub notNil ifTrue:[
 	    s := s , sub.
 	].
-	subStringIndex == strings size ifFalse:[
+	subStringIndex == nSub ifFalse:[
 	    s := s , tab
 	]
     ].
 
     ^ s
+
+    "Created: 24.11.1995 / 18:54:27 / cg"
 ! !
 
 !MultiColListEntry methodsFor:'defaults'!
@@ -441,5 +443,5 @@
 !MultiColListEntry class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/MultiColListEntry.st,v 1.11 1995-11-23 18:08:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/MultiColListEntry.st,v 1.12 1995-11-24 20:54:55 cg Exp $'
 ! !