Posted to tcl by emiliano at Fri May 29 15:31:39 GMT 2020view pretty
package require Tk set var1 var1 set var2 var2 upvar 0 var1 alias pack [entry .alias -textvariable alias] update idle upvar 0 var2 alias puts "entry -textvariable: [.alias cget -textvariable]" puts "variable value: [set [.alias cget -textvariable]]" puts "entry content: [.alias get]" # output differs