--- a/SystemBrowser.st	Mon Mar 03 15:22:36 1997 +0100
+++ b/SystemBrowser.st	Mon Mar 03 15:24:39 1997 +0100
@@ -234,6 +234,9 @@
         "/ a matchString - need string matching procedure
 
         searchBlock := [:class :method :s |
+                            method isLazyMethod ifTrue:[
+                                method makeRealMethod
+                            ].
                             (method literalsDetect:[:aLiteral|
                                 (aLiteral isMemberOf:Symbol) 
                                   and:[aSelectorString match:aLiteral]
@@ -249,7 +252,12 @@
             sel isNil ifTrue:[
                 ^ nil     "/ none
             ].
-            searchBlock := [:class :method :s | method sends:sel].
+            searchBlock := [:class :method :s | 
+                                method isLazyMethod ifTrue:[
+                                    method makeRealMethod
+                                ].
+                                method sends:sel
+                           ].
         ]
     ].
     ^ self allMethodsIn:aCollectionOfClasses where:searchBlock
@@ -258,7 +266,7 @@
      SystemBrowser allCallsOn:#at:put: in:(Smalltalk allClasses)
     "
 
-    "Modified: 30.1.1997 / 16:03:24 / cg"
+    "Modified: 3.3.1997 / 15:20:09 / cg"
 !
 
 allMethodsIn:aCollectionOfClasses inst:wantInst class:wantClass where:aBlock
@@ -1757,6 +1765,6 @@
 !SystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/SystemBrowser.st,v 1.76 1997-02-13 22:19:42 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/SystemBrowser.st,v 1.77 1997-03-03 14:24:39 cg Exp $'
 ! !
 SystemBrowser initialize!