--- a/ListModelView.st	Fri Sep 01 17:57:15 2000 +0200
+++ b/ListModelView.st	Tue Sep 05 14:03:21 2000 +0200
@@ -1070,11 +1070,10 @@
 !
 
 recreate
-    "fetch device dependent resources
-    "
+    "sent after a snapin, reinit for new device"
+
     super recreate.
     self fetchResources.
-
 !
 
 reinitialize
@@ -1613,6 +1612,6 @@
 !ListModelView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/ListModelView.st,v 1.47 2000-09-01 15:57:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/ListModelView.st,v 1.48 2000-09-05 12:03:21 cg Exp $'
 ! !
 ListModelView initialize!