--- a/Tools__NewSystemBrowser.st Thu Apr 28 22:19:26 2016 +0200
+++ b/Tools__NewSystemBrowser.st Fri Apr 29 00:45:30 2016 +0200
@@ -23675,7 +23675,10 @@
self clearInfo.
codeView := self codeView.
- self explainInCode:(codeView contentsAsString string) short:true withTimeout:true
+ self
+ explainInCode:(codeView contentsAsString string)
+ short:true
+ withTimeout:true
"Modified: / 05-09-2006 / 10:37:10 / cg"
!
@@ -57845,7 +57848,7 @@
explanation :=
[ self explanationForCode:code short:short ]
valueWithWatchDog:[explainTookTooLong := true]
- afterMilliseconds:200.
+ afterMilliseconds:400.
] ifFalse:[
explanation := self explanationForCode:code short:short
].