#BUGFIX by cg
authorClaus Gittinger <cg@exept.de>
Wed, 09 Nov 2016 11:19:08 +0100
changeset 17056 20e4c1abbbcf
parent 17055 594d3acd76f5
child 17057 b18c8b16129d
#BUGFIX by cg class: SystemBrowser changed: #searchBlockForStringLiteral:ignoreCase:match:fullWordsOnly: handle the case where no source code is available.
SystemBrowser.st
--- a/SystemBrowser.st	Wed Nov 09 03:21:23 2016 +0100
+++ b/SystemBrowser.st	Wed Nov 09 11:19:08 2016 +0100
@@ -5954,7 +5954,10 @@
         ].
         skip ifFalse:[
             src := method source.
-            (src includes:$') ifTrue:[ "/ eliminates many
+            src isNil ifTrue:[
+                ('SystemBrowser: [warning]: no source for method: ',methodArg printString) errorPrintCR.
+            ].    
+            (src notNil and:[src includes:$']) ifTrue:[ "/ eliminates many
                 (checkSource value:src) ifTrue:[
                     tree := cls parseTreeFor:sel.
                     "/ walk