|
|
|
@ -3185,6 +3185,8 @@ namespace eval shellfilter { |
|
|
|
#set newbytes [encoding convertto utf-16 $stringrep] |
|
|
|
#set newbytes [encoding convertto utf-16 $stringrep] |
|
|
|
#puts -nonewline $outchan $newbytes |
|
|
|
#puts -nonewline $outchan $newbytes |
|
|
|
puts -nonewline $outchan $outchunk |
|
|
|
puts -nonewline $outchan $outchunk |
|
|
|
|
|
|
|
#jmn test 2025 |
|
|
|
|
|
|
|
flush $outchan |
|
|
|
} |
|
|
|
} |
|
|
|
} |
|
|
|
} |
|
|
|
|
|
|
|
|
|
|
|
|