--- a/HTMLUtilities.st Wed Jun 25 19:19:02 2014 +0200
+++ b/HTMLUtilities.st Tue Jul 01 12:12:38 2014 +0200
@@ -371,13 +371,14 @@
^ resultStream contents
"
- self withSpecialHTMLCharactersEscaped:'<>#&'
- self withSpecialHTMLCharactersEscaped:$<
- self withSpecialHTMLCharactersEscaped:$#
+ self withAllSpecialHTMLCharactersEscaped:'<>#&'
+ self withAllSpecialHTMLCharactersEscaped:$<
+ self withAllSpecialHTMLCharactersEscaped:$#
"
"Modified: / 05-12-2006 / 13:48:59 / cg"
"Modified: / 20-08-2013 / 14:12:20 / sr"
+ "Modified (comment): / 01-07-2014 / 12:12:32 / sr"
!
withSpecialHTMLCharactersEscaped:aStringOrCharacter
@@ -507,10 +508,10 @@
!HTMLUtilities class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic2/HTMLUtilities.st,v 1.17 2013-08-20 12:14:23 sr Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic2/HTMLUtilities.st,v 1.18 2014-07-01 10:12:38 sr Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic2/HTMLUtilities.st,v 1.17 2013-08-20 12:14:23 sr Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic2/HTMLUtilities.st,v 1.18 2014-07-01 10:12:38 sr Exp $'
! !