checkin from browser
authorClaus Gittinger <cg@exept.de>
Fri, 08 Mar 1996 14:46:18 +0100
changeset 523 2de6065d37c8
parent 522 1b041037c1ee
child 524 577c0d1cb144
checkin from browser
PopUpView.st
--- a/PopUpView.st	Fri Mar 08 11:48:39 1996 +0100
+++ b/PopUpView.st	Fri Mar 08 14:46:18 1996 +0100
@@ -258,6 +258,8 @@
     "grab the pointer here, when visible (but not control is already lost). 
      If the grab fails, try again and unrealize myself if that fails too."
 
+    mapTime := Time millisecondClockValue.
+
     super mapped.
 
     (haveControl 
@@ -280,7 +282,7 @@
         self getKeyboardFocus
     ]
 
-    "Modified: 1.3.1996 / 13:17:35 / cg"
+    "Modified: 8.3.1996 / 13:40:26 / cg"
 !
 
 realize
@@ -306,5 +308,5 @@
 !PopUpView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/PopUpView.st,v 1.24 1996-03-06 15:48:58 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/PopUpView.st,v 1.25 1996-03-08 13:46:18 cg Exp $'
 ! !