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

proc tclpropeval2: $sch_basename: remove path elements (use [file tail])

This commit is contained in:
stefan schippers 2024-02-16 23:24:54 +01:00
parent 876f26cb80
commit 8b55066978
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/xschem.tcl
View File

@ -4501,7 +4501,7 @@ proc tclpropeval2 {s} {
# puts "tclpropeval2: s=|$s|"
if {$debug_var <=-1} {puts "tclpropeval2: $s"}
set path [string range [xschem get sch_path] 1 end]
set sch_basename [file rootname [xschem get current_name]]
set sch_basename [file tail [file rootname [xschem get current_name]]]
# skip hierarchy components above the level where raw file has been loaded.
# node path names to look up in raw file begin from there.
set skip 0