--- a/WinBuilder.st	Mon Feb 17 19:50:14 1997 +0100
+++ b/WinBuilder.st	Mon Feb 17 19:51:27 1997 +0100
@@ -75,8 +75,15 @@
     applicationClass := something.!
 
 aspectAt:aSymbol
+    |b|
+
     bindings isNil ifTrue:[^ nil].
-    ^ bindings at:aSymbol ifAbsent:nil
+    b := bindings at:aSymbol ifAbsent:nil.
+    b notNil ifTrue:[^ b].
+    application notNil ifTrue:[
+        ^ application aspectFor:aSymbol
+    ].
+    ^ nil
 
     "Modified: 17.1.1997 / 19:28:32 / cg"
 !
@@ -412,5 +419,5 @@
 !WindowBuilder class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/Attic/WinBuilder.st,v 1.22 1997-02-14 19:35:37 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/Attic/WinBuilder.st,v 1.23 1997-02-17 18:51:27 ca Exp $'
 ! !