TopView.st
changeset 5887 01e5466e9686
parent 5744 a01df3cdda2d
child 5971 7f45b30da64a
--- a/TopView.st	Mon Mar 12 20:29:48 2012 +0100
+++ b/TopView.st	Mon Mar 12 20:31:13 2012 +0100
@@ -1277,14 +1277,18 @@
      it seems not deterministic, where the view actually ends up being positioned.
      Not all windowManagers (olwm) honor this - some insist on it ..."
 
+    <resource: #obsolete>
+
     |otherId|
 
+    self obsoleteMethodWarning.
+
     drawableId isNil ifTrue:[self create].
     anotherView isNil ifTrue:[
-	otherId := drawableId.
+        otherId := drawableId.
     ] ifFalse:[
-	anotherView create.
-	otherId := anotherView id.
+        anotherView create.
+        otherId := anotherView id.
     ].
     device setTransient:drawableId for:otherId.
     self origin:aPosition.
@@ -1355,6 +1359,8 @@
      it seems not deterministic, where the view actually ends up being positioned.
      Not all windowManagers (olwm) honor this - some insist on it ..."
 
+    <resource: #obsolete>
+    self obsoleteMethodWarning.
     self openAt:aPosition transientFor:nil
 
     "normal open:
@@ -1493,11 +1499,11 @@
 !TopView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/TopView.st,v 1.143 2011-04-15 14:06:31 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/TopView.st,v 1.144 2012-03-12 19:31:13 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview/TopView.st,v 1.143 2011-04-15 14:06:31 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/TopView.st,v 1.144 2012-03-12 19:31:13 stefan Exp $'
 ! !
 
 TopView initialize!