use #creator instead of #signal
(avoid semantic conflict with ANSI, where signal means: raise)
--- a/InspectorView.st Fri Apr 19 11:38:08 2013 +0200
+++ b/InspectorView.st Fri Apr 19 11:38:09 2013 +0200
@@ -2157,7 +2157,7 @@
maxStringLength := 100000.
Error handle:[:ex |
- (ex signal == WriteError and:[s isStream]) ifTrue:[
+ (ex creator == WriteError and:[s isStream]) ifTrue:[
"hit the write limit"
s writeLimit:nil.
s nextPutAll:' ...'.
@@ -3505,10 +3505,10 @@
!InspectorView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.305 2013-04-04 07:42:22 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.306 2013-04-19 09:38:09 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.305 2013-04-04 07:42:22 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.306 2013-04-19 09:38:09 cg Exp $'
! !