PopUpView.st
changeset 643 d58256573e17
parent 616 56cf67c82664
child 648 a913a55fa11b
--- a/PopUpView.st	Sat May 04 01:05:49 1996 +0200
+++ b/PopUpView.st	Sat May 04 01:06:56 1996 +0200
@@ -115,10 +115,12 @@
     "hide the view, leave its modal event loop"
 
     windowGroup notNil ifTrue:[
-	windowGroup removeView:self.
-	windowGroup := nil.
+        windowGroup removeView:self.
+        windowGroup := nil.
     ].
-    self unrealize.
+    self unmap.
+
+    "Modified: 3.5.1996 / 23:48:22 / stefan"
 !
 
 show
@@ -265,7 +267,7 @@
 
 mapped
     "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."
+     If the grab fails, try again and unmap myself if that fails too."
 
     mapTime := Time millisecondClockValue.
 
@@ -281,7 +283,7 @@
             (device grabPointerInView:self) ifFalse:[
                 "give up"
                 'could not grab pointer' errorPrintNL.
-                self unrealize
+                self unmap
             ]
         ].
         exclusivePointer ifFalse:[
@@ -292,6 +294,7 @@
     ]
 
     "Modified: 8.3.1996 / 13:40:26 / cg"
+    "Modified: 3.5.1996 / 23:48:37 / stefan"
 !
 
 realize
@@ -305,17 +308,19 @@
     ^ self
 !
 
-unrealize
+unmap
     haveControl := false.
     device activePointerGrab == self ifTrue:[
-	device ungrabPointer.
+        device ungrabPointer.
     ].
-    super unrealize.
-    shadowView notNil ifTrue:[shadowView unrealize].
+    super unmap.
+    shadowView notNil ifTrue:[shadowView unmap].
+
+    "Modified: 3.5.1996 / 23:46:06 / stefan"
 ! !
 
 !PopUpView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/PopUpView.st,v 1.27 1996-04-25 17:17:11 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/PopUpView.st,v 1.28 1996-05-03 23:06:56 stefan Exp $'
 ! !