From 0b17bcdb8635b0e6fb35a672269b89eb84bb5611 Mon Sep 17 00:00:00 2001
From: Tim Edwards <tim@opencircuitdesign.com>
Date: Fri, 29 May 2020 11:27:16 -0400
Subject: [PATCH] Try again without confusing Tcl and python syntax. . .

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

diff --git a/tcltk/readspice.tcl b/tcltk/readspice.tcl
index af789464..4fe8d78b 100644
--- a/tcltk/readspice.tcl
+++ b/tcltk/readspice.tcl
@@ -15,9 +15,9 @@ global Opts
 
 proc readspice {netfile} {
    if {[file ext $netfile] == ".cdl"} {
-      is_cdl = true
+      set is_cdl true
    } else {
-      is_cdl = false
+      set is_cdl false
    }
 
    if [catch {open  $netfile r} fnet] {
@@ -40,7 +40,7 @@ proc readspice {netfile} {
                         puts stderr "Error:  Can't read netlist file $netfile"
 	                return 1;
 		     } else {
-			is_cdl = true
+			set is_cdl true
 		     }
 		  }
 	       }