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

inserting a wave with Add button in graphdialog will preserve previous wave colors

This commit is contained in:
stefan schippers 2025-09-22 14:23:27 +02:00
parent bd0e07fbe7
commit ac4e7fc7fb
1 changed files with 11 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
src/xschem.tcl
View File

@ -3030,7 +3030,7 @@ proc graph_add_nodes_from_list {nodelist} {
# add nodes from left listbox
proc graph_add_nodes {} {
global graph_bus
global graph_bus graph_sel_color graph_selected
set sel_idx [.graphdialog.center.left.list1 curselection]
set sel {}
if {$graph_bus} {
@ -3059,7 +3059,17 @@ proc graph_add_nodes {} {
set sel "${sel}\n"
}
if {$change_done} {
set tag [.graphdialog.center.right.text1 tag names insert]
if { $tag eq {}} {set tag [.graphdialog.center.right.text1 tag names {insert - 1 char}]}
.graphdialog.center.right.text1 insert {insert lineend + 1 char} $sel
# insert $graph_sel_color colors along with inserted nodes, so previous wave colors are preserved
if { [regexp {^t} $tag]} {
set index [string range $tag 1 end]
incr index
set col [xschem getprop rect 2 $graph_selected color]
set col [linsert $col $index $graph_sel_color]
xschem setprop -fast rect 2 $graph_selected color $col
}
}
}