Marcel Taeumel uploaded a new version of HelpSystem-Core to project The Trunk:
http://source.squeak.org/trunk/HelpSystem-Core-mt.73.mcz==================== Summary ====================
Name: HelpSystem-Core-mt.73
Author: mt
Time: 3 May 2015, 10:40:26.596 pm
UUID: fbfe2a9b-a41b-5f4d-b5de-6ec6f8f7fc73
Ancestors: HelpSystem-Core-kfr.72
Use HtmlReadWriter for parsing html help topics.
=============== Diff against HelpSystem-Core-kfr.72 ===============
Item was changed:
----- Method: HtmlHelpTopic>>contents (in category 'accessing') -----
contents
| start end |
start := (self document findString: '<body').
start := (self document findString: '>' startingAt: start) + 1.
end := self document findString: '</body>' startingAt: start.
start > end ifTrue: [^ self document].
+ ^ ((self document copyFrom: start to: end - 1)
+ copyReplaceAll: String cr with: '<br>')
+ asTextFromHtml!
- ^ (self document copyFrom: start to: end - 1) asUnHtml withBlanksTrimmed!