From 232384f8fbf16836938ec0ce65c20b05d8a39b97 Mon Sep 17 00:00:00 2001
From: stefan schippers <stefan.schippers@gmail.com>
Date: Wed, 9 Apr 2025 13:07:53 +0200
Subject: [PATCH] better zoom line width based on xctx->min_lw

---
 src/xinit.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/xinit.c b/src/xinit.c
index cdf65bab..09953d74 100644
--- a/src/xinit.c
+++ b/src/xinit.c
@@ -2072,7 +2072,7 @@ void change_linewidth(double w)
   if(w<0. || xctx->lw == -1.0) {
     double cs = tclgetdoublevar("cadsnap");
     if(tclgetboolvar("change_lw"))  {
-      xctx->lw=xctx->mooz * 0.09 * cs;
+      xctx->lw=xctx->mooz * 0.09 * cs * (1.0 + MAJOR(xctx->min_lw, 1.0) / 4.0);
       if(xctx->lw > 100.) xctx->lw = 100.;
       xctx->cadhalfdotsize = CADHALFDOTSIZE * (cs < 20. ? cs : 20.) / 10.;
     }