deleted obsolete code left after last commit
This commit is contained in:
parent
1fa99bd840
commit
4d6279e152
|
|
@ -2316,19 +2316,6 @@ proc text_line {txtlabel clear {preserve_disabled disabled} } {
|
|||
set old_selected_tok $selected_tok
|
||||
}
|
||||
|
||||
|
||||
bind .dialog.f1.r5 <KeyRelease> {
|
||||
set selected_tok [.dialog.f1.r5 get]
|
||||
if {$selected_tok eq {<ALL>} } {
|
||||
set retval $retval_orig
|
||||
} else {
|
||||
set retval [xschem get_tok $retval_orig $selected_tok]
|
||||
regsub -all {\\?"} $retval {"} retval
|
||||
}
|
||||
.dialog.e1 delete 1.0 end
|
||||
.dialog.e1 insert 1.0 $retval
|
||||
}
|
||||
|
||||
bind .dialog.f1.r5 <KeyRelease> {
|
||||
set selected_tok [.dialog.f1.r5 get]
|
||||
if { $old_selected_tok eq {<ALL>}} {
|
||||
|
|
@ -2352,7 +2339,6 @@ proc text_line {txtlabel clear {preserve_disabled disabled} } {
|
|||
set old_selected_tok $selected_tok
|
||||
}
|
||||
|
||||
|
||||
bind .dialog <Control-Return> {.dialog.f1.b1 invoke}
|
||||
#tkwait visibility .dialog
|
||||
#grab set .dialog
|
||||
|
|
|
|||
Loading…
Reference in New Issue