smalltalk
/
osmo-st-all
Archived
1
0
Fork 0
This commit is contained in:
Nicolas Petton 2009-06-26 22:27:42 +00:00
parent e1a90251c1
commit 110df99cd8
1 changed files with 0 additions and 11 deletions

View File

@ -92,17 +92,6 @@ RequestHandler subclass: ErrorHandler [
self error resumeContext backtraceOn: str]).
page build printHtmlOn: stream])]
]
walkbackStringsFor: anError [
| ctx strings |
strings := OrderedCollection new.
ctx := anError resumeContext.
[strings size <= 20 and: [ctx notNil] ] whileTrue: [
ctx isInternalExceptionHandlingContext
ifFalse: [ strings add: ctx printString ].
ctx := ctx parentContext ].
^strings
]
]
Signal extend [