From c45ae9248b28c6e49c4afeb40940dcd68b3067b6 Mon Sep 17 00:00:00 2001
From: stefan schippers <stefan.schippers@gmail.com>
Date: Mon, 30 Dec 2024 01:11:37 +0100
Subject: [PATCH] slightly bigger font for traversal

---
 src/xschem.tcl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/xschem.tcl b/src/xschem.tcl
index 0b9319c1..b1a15372 100644
--- a/src/xschem.tcl
+++ b/src/xschem.tcl
@@ -1766,7 +1766,7 @@ proc cellview {} {
   global keep_symbols
 
   if {[info tclversion] >= 8.5} {
-    set font Monospace
+    set font {TkDefaultFont 10 bold} ;# Monospace
   } else {
     set font fixed
   }
@@ -1890,7 +1890,7 @@ proc traversal {{only_subckts {0}}} {
   xschem set no_undo 1 ;# disable undo 
 
   if {[info tclversion] >= 8.5} {
-    set font {TkDefaultFont 8 bold} ;# Monospace
+    set font {TkDefaultFont 10 bold} ;# Monospace
   } else {
     set font fixed
   }
@@ -1932,7 +1932,7 @@ proc traversal {{only_subckts {0}}} {
 proc hier_traversal {{level 0} only_subckts} {
   global nolist_libs traversal_cnt
   if {[info tclversion] >= 8.5} {
-    set font {TkDefaultFont 8 bold} ;# Monospace
+    set font {TkDefaultFont 10 bold} ;# Monospace
   } else { 
     set font fixed
   }