Artifact
b1ff12ed7b3848a172c209f14745661185d939b9:
Attachment "mime.patch" to
ticket [548832ffff]
added by
cleverly
2002-04-26 05:34:23.
--- tcllib-1.2/modules/mime/mime.tcl Mon Jan 21 10:55:22 2002
+++ tcllib-1.2/modules/mime/mime-modified.tcl Thu Apr 25 17:00:03 2002
@@ -2183,7 +2183,7 @@
# with =xx sequence
regsub -all -- \
- {[\x00-\x08\x0B-\x1E\x21-\x24\x40\x5B-\x5E\x60\x7B-\xFF]} \
+ {[\x00-\x08\x0B-\x1E\x21-\x24\x3D\x40\x5B-\x5E\x60\x7B-\xFF]} \
$string {[format =%02X [scan "\\&" %c]]} string
# Replace the format commands with their result
