#BUGFIX by cg
class: SystemBrowser
changed: #searchBlockForStringLiteral:ignoreCase:match:fullWordsOnly:
handle the case where no source code is available.
--- 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