--- a/ApplicationSubView.st	Wed Dec 08 20:53:04 1999 +0100
+++ b/ApplicationSubView.st	Wed Dec 08 20:56:31 1999 +0100
@@ -12,8 +12,9 @@
     needed sometimes, when a full application is embeded into an ExtendedComboBox
     or subcanvas AND you want to avoid, that this application accesses the outer
     applications aspects (by returning a private application instance).
-    WARNING: you have to manually set this views application to be the embedded app
-             (i.e. via #application:)
+
+    Notice: you may have to manually set this views application to be the embedded app
+           (i.e. via #application:) unless it is set by #client:....
 
     see self-embedding example in CodingExamples_GUI::GUIDemoExtendedComboBox
 "
@@ -35,10 +36,17 @@
 application:something
     "set the value of the instance variable 'application' (automatically generated)"
 
-    application := something.! !
+    application := something.!
+
+client:anApplication spec:aWindowSpecOrSpecSymbol builder:aBuilder
+    self application:anApplication.
+    ^ super client:anApplication spec:aWindowSpecOrSpecSymbol builder:aBuilder
+
+
+! !
 
 !ApplicationSubView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ApplicationSubView.st,v 1.1 1999-12-08 19:53:04 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ApplicationSubView.st,v 1.2 1999-12-08 19:56:31 ca Exp $'
 ! !