update
This commit is contained in:
4
.CondaPkg/env/Library/lib/tk8.6/tkfbox.tcl
vendored
4
.CondaPkg/env/Library/lib/tk8.6/tkfbox.tcl
vendored
@@ -226,7 +226,9 @@ proc ::tk::dialog::file:: {type args} {
|
||||
foreach trace [trace info variable data(selectPath)] {
|
||||
trace remove variable data(selectPath) {*}$trace
|
||||
}
|
||||
$data(dirMenuBtn) configure -textvariable {}
|
||||
if {[winfo exists $data(dirMenuBtn)]} {
|
||||
$data(dirMenuBtn) configure -textvariable {}
|
||||
}
|
||||
|
||||
return $Priv(selectFilePath)
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user