The problem is in parseMimeValue. It's to simple to split by ;
I attach parseMimeValue.tcl. It simply contains the modified proc parseMimeValue.
replacement for the parseMimeValue proc
replacement for the parseMimeValue proc