--- a/SimpleView.st	Sat Jan 23 07:28:04 2016 +0000
+++ b/SimpleView.st	Tue Jan 26 09:50:04 2016 +0000
@@ -11478,6 +11478,18 @@
     "Modified: / 22-03-2011 / 13:33:13 / cg"
 !
 
+openModelessAtPointer
+    "create and schedule a new windowgroup for me and open the view.
+     The view will be handled by its own process, effectively running in
+     parallel (i.e. control is returned to the sender immediately)."
+
+    self openModelessAt:(self graphicsDevice pointerPosition)
+
+    "
+     (Button label:'hello') openModelessAtPointer
+    "
+!
+
 waitUntilVisible
     "wait until the receiver visible.
      In normal applications, you do not need to wait till a view is