--- a/PullDownMenu.st	Wed Sep 06 15:48:45 2000 +0200
+++ b/PullDownMenu.st	Wed Sep 06 15:50:39 2000 +0200
@@ -1531,7 +1531,7 @@
 !
 
 recreate
-    "sent after a snapin;
+    "sent after a snapin or a migration;
      if the image was saved with an active menu, hide it"
 
     |m|
@@ -1805,5 +1805,5 @@
 !PullDownMenu class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/PullDownMenu.st,v 1.93 2000-09-05 12:03:47 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/PullDownMenu.st,v 1.94 2000-09-06 13:50:03 cg Exp $'
 ! !

--- a/TextCollector.st	Wed Sep 06 15:48:45 2000 +0200
+++ b/TextCollector.st	Wed Sep 06 15:50:39 2000 +0200
@@ -10,6 +10,8 @@
  hereby transferred.
 "
 
+"{ Package: 'stx:libwidg' }"
+
 EditTextView subclass:#TextCollector
 	instanceVariableNames:'entryStream lineLimit destroyAction outstandingLines
 		outstandingLine flushBlock flushPending inFlush collecting
@@ -412,7 +414,8 @@
 !
 
 reinitialize
-    "recreate access-semaphore; image could have been save (theoretically)
+    "reinit after a snapIn.
+     recreate access-semaphore; image could have been save (theoretically)
      with the semaphore locked - in this case, we had a deadlock"
 
     flushPending := false.
@@ -777,6 +780,6 @@
 !TextCollector class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/TextCollector.st,v 1.64 2000-02-23 22:38:33 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/TextCollector.st,v 1.65 2000-09-06 13:50:39 cg Exp $'
 ! !
 TextCollector initialize!