--- a/ModelListEntry.st	Wed Feb 25 17:09:46 2004 +0100
+++ b/ModelListEntry.st	Wed Feb 25 17:09:56 2004 +0100
@@ -67,26 +67,22 @@
 !ModelListEntry methodsFor:'accessing'!
 
 model
-    "return the value of the instance variable 'model' (automatically generated)"
-
     ^ model
 !
 
 model:something
-    "set the value of the instance variable 'model' (automatically generated)"
-
     model := something.
 !
 
+string
+    ^ string
+!
+
 string:something
-    "set the value of the instance variable 'string' (automatically generated)"
-
     string := something.
 !
 
 string:stringArg model:modelArg 
-    "set instance variables (automatically generated)"
-
     string := stringArg.
     model := modelArg.
 ! !
@@ -125,5 +121,5 @@
 !ModelListEntry class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/ModelListEntry.st,v 1.3 2003-10-13 14:13:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/ModelListEntry.st,v 1.4 2004-02-25 16:09:56 cg Exp $'
 ! !