luke
/
xschem
mirror of https://github.com/StefanSchippers/xschem.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

removed useless global tcl var token

This commit is contained in:
Stefan Frederik 2022-01-17 12:10:06 +01:00
parent 264b602b8d
commit 159b362c9f
1 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/xschem.tcl
View File

@ -2362,11 +2362,10 @@ proc property_search {} {
set search_value [.dialog.val.e get]
set custom_token [.dialog.custom.e get]
if {$debug_var<=-1} { puts stderr "|$custom_token|" }
set token $custom_token
if { $search_exact==1 } {
set search_found [xschem searchmenu exact $search_select $token $search_value]
set search_found [xschem searchmenu exact $search_select $custom_token $search_value]
} else {
set search_found [xschem searchmenu regex $search_select $token $search_value]
set search_found [xschem searchmenu regex $search_select $custom_token $search_value]
}
destroy .dialog
}
@ -2474,7 +2473,6 @@ proc attach_labels_to_inst {} {
frame .dialog.but
button .dialog.but.ok -text OK -command {
set custom_label_prefix [.dialog.custom.e get]
set token $custom_token
#### put command here
set rcode yes
destroy .dialog