--- 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 $'
 ! !