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

avoid use of -tabstyle for tcl-tk 8.4

This commit is contained in:
stefan schippers 2025-09-10 08:09:09 +02:00
parent 1a898f63ef
commit e7ed61a6b0
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/xschem.tcl
View File

@ -10037,7 +10037,11 @@ set_ne to_png {gm convert}
set_ne to_pdf {ps2pdf}
## tab stop position
set_ne tabstop 8
set text_tabs_setting {-tabs "[expr {$tabstop * [font measure TkFixedFont 0]}] left" -tabstyle wordprocessor}
if { [info tclversion] > 8.4 } {
set text_tabs_setting {-tabs "[expr {$tabstop * [font measure TkFixedFont 0]}] left" -tabstyle wordprocessor}
} else {
set text_tabs_setting {-tabs "[expr {$tabstop * [font measure TkFixedFont 0]}] left"}
}
# selected graph user is editing attributes with graph GUI
set_ne graph_bus 0