--- a/SimpleView.st	Tue Aug 29 18:41:59 1995 +0200
+++ b/SimpleView.st	Wed Aug 30 01:42:10 1995 +0200
@@ -44,7 +44,7 @@
 COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.16 1995-08-29 16:41:59 claus Exp $
+$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.17 1995-08-29 23:41:32 claus Exp $
 '!
 
 !SimpleView class methodsFor:'documentation'!
@@ -65,7 +65,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.16 1995-08-29 16:41:59 claus Exp $
+$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.17 1995-08-29 23:41:32 claus Exp $
 "
 !
 
@@ -4823,7 +4823,7 @@
     aView == self isNil ifTrue:[^ true].
     superView isNil ifTrue:[^ false].
     superView == aView ifTrue:[^ true].
-    ^ superView isSubView of:aView
+    ^ superView isSubViewOf:aView
 !
 
 canHandle:aKey from:aView