Lines Matching refs:enc
294 if { [catch {set enc [registry get $key $perprogEnc]} err] } {
297 if { [string compare $enc ""] == 0 } {
300 return $enc
303 proc regSetEncode { prg enc } {
316 if { [string compare $enc $perprogDef] == 0 } {
317 set enc ""
319 if { [catch {registry set $key $perprogEnc $enc sz} ] } {
489 proc execWrap { pw lb dlg prg enc } {
492 set encName [$enc get]
598 set enc [regGetEncode $prgName]
599 if { [string compare $encName $enc] != 0 } {
600 set encName $enc
615 set enc [regGetEncode $file]