ismodal moved up
authorca
Fri, 27 Oct 2000 15:17:30 +0200
changeset 3346 bf96cfb1f6ac
parent 3345 1d7c4a14bd06
child 3347 e7b8350d6525
ismodal moved up
StandardSystemView.st
--- a/StandardSystemView.st	Fri Oct 27 15:17:10 2000 +0200
+++ b/StandardSystemView.st	Fri Oct 27 15:17:30 2000 +0200
@@ -1248,16 +1248,6 @@
     "Modified: / 31.10.1997 / 19:14:02 / cg"
 !
 
-isModal
-    "return true, if the receiver has been opened modal"
-
-    windowGroup isNil ifTrue:[^ false].
-    ^ windowGroup isModal
-
-    "Created: 10.12.1995 / 13:11:17 / cg"
-    "Modified: 24.4.1996 / 09:46:31 / cg"
-!
-
 processName
     "return a string to be shown for my process in the
      process monitor. This has no semantic meaning, but exists
@@ -1472,6 +1462,6 @@
 !StandardSystemView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/StandardSystemView.st,v 1.133 2000-09-27 13:28:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/StandardSystemView.st,v 1.134 2000-10-27 13:17:30 ca Exp $'
 ! !
 StandardSystemView initialize!