--- a/HTMLUtilities.st Sun Jan 09 10:47:13 2011 +0100
+++ b/HTMLUtilities.st Sun Jan 09 13:11:36 2011 +0100
@@ -218,7 +218,7 @@
"helper to escape invalid/dangerous characters in an urls arguments.
Similar to urlEncode, but treats '*','~' and spaces differently.
(some clients, such as bitTorrent seem to require this - time will tell...)
- Any byte not in the set 0-9, a-z, A-Z, '.', '-', '_' and '~', is encoded using
+ Any byte not in the set 0-9, a-z, A-Z, '.', '-', '_', is encoded using
the '%nn' format, where nn is the hexadecimal value of the byte.
see: RFC1738"
@@ -230,7 +230,7 @@
[rs atEnd] whileFalse: [
c := rs next.
- (c isLetterOrDigit or:[ ('-_.~' includes:c) ]) ifTrue:[
+ (c isLetterOrDigit or:[ ('-_.' includes:c) ]) ifTrue:[
ws nextPut:c.
] ifFalse:[
ws nextPut: $%.
@@ -239,6 +239,7 @@
].
"Created: / 09-01-2011 / 10:32:27 / cg"
+ "Modified: / 09-01-2011 / 13:11:17 / cg"
!
urlEncode:aStringOrStream on:ws
@@ -496,9 +497,9 @@
!HTMLUtilities class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic2/HTMLUtilities.st,v 1.13 2011-01-09 09:47:13 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic2/HTMLUtilities.st,v 1.14 2011-01-09 12:11:36 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic2/HTMLUtilities.st,v 1.13 2011-01-09 09:47:13 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic2/HTMLUtilities.st,v 1.14 2011-01-09 12:11:36 cg Exp $'
! !