set min_lw in xinit.c based on xschemrc line_width var

This commit is contained in:
stefan schippers 2025-04-09 12:20:06 +02:00
parent c3cb1218a1
commit d4fc6c96c1
1 changed files with 2 additions and 2 deletions

View File

@ -2712,7 +2712,6 @@ int Tcl_AppInit(Tcl_Interp *inter)
tclsetboolvar("color_ps", color_ps); tclsetboolvar("color_ps", color_ps);
} }
l_width=tclgetdoublevar("line_width"); l_width=tclgetdoublevar("line_width");
if(tclgetboolvar("change_lw")) l_width = -1.0;
cadlayers=tclgetintvar("cadlayers"); cadlayers=tclgetintvar("cadlayers");
fix_broken_tiled_fill = tclgetboolvar("fix_broken_tiled_fill"); fix_broken_tiled_fill = tclgetboolvar("fix_broken_tiled_fill");
fix_mouse_coord = tclgetboolvar("fix_mouse_coord"); fix_mouse_coord = tclgetboolvar("fix_mouse_coord");
@ -2861,7 +2860,8 @@ int Tcl_AppInit(Tcl_Interp *inter)
/* load font from tcl 20171112 */ /* load font from tcl 20171112 */
tclsetvar("has_cairo","1"); tclsetvar("has_cairo","1");
#endif #endif
xctx->min_lw = (int)l_width;
if(tclgetboolvar("change_lw")) l_width = -1.0;
change_linewidth(l_width); change_linewidth(l_width);
dbg(1, "Tcl_AppInit(): done xinit()\n"); dbg(1, "Tcl_AppInit(): done xinit()\n");
/* Set backing store window attribute */ /* Set backing store window attribute */